From: Suvayu Ali <fatkasuvayu+linux@gmail.com>
To: Org mode mailing list <emacs-orgmode@gnu.org>
Subject: [PATCH] Add customisable face for inlinetasks
Date: Sat, 20 Aug 2011 13:18:08 +0200 [thread overview]
Message-ID: <20110820131808.31793978@kuru.homelinux.net> (raw)
[-- Attachment #1: Type: text/plain, Size: 138 bytes --]
Hi,
Attached is a small patch that defines a customisable face for
inlinetasks.
--
Suvayu
Open source is the future. It sets us free.
[-- Attachment #2: 0001-Define-org-inlinetask-face.patch --]
[-- Type: text/plain, Size: 1347 bytes --]
From 16359dd0352baa0e636aec6bf6573fbbb913bef4 Mon Sep 17 00:00:00 2001
From: Suvayu Ali <fatkasuvayu+linux@gmail.com>
Date: Tue, 2 Aug 2011 00:24:50 +0200
Subject: [PATCH] Define org-inlinetask face
---
lisp/org-inlinetask.el | 8 +++++++-
1 files changed, 7 insertions(+), 1 deletions(-)
diff --git a/lisp/org-inlinetask.el b/lisp/org-inlinetask.el
index 7d0d691..33a8abd 100644
--- a/lisp/org-inlinetask.el
+++ b/lisp/org-inlinetask.el
@@ -405,6 +405,12 @@ Either remove headline and meta data, or do special formatting."
(current-column)))
(defvar org-indent-indentation-per-level) ; defined in org-indent.el
+
+(defface org-inlinetask
+ (org-compatible-face 'org-level-8 '((t (:bold t))))
+ "Face for inlinetask headlines."
+ :group 'org-faces)
+
(defun org-inlinetask-fontify (limit)
"Fontify the inline tasks."
(let* ((nstars (if org-odd-levels-only
@@ -425,7 +431,7 @@ Either remove headline and meta data, or do special formatting."
(add-text-properties (match-beginning 2) (match-end 2)
'(face org-hide font-lock-fontified t))
(add-text-properties (match-beginning 3) (match-end 3)
- '(face shadow font-lock-fontified t)))))
+ '(face org-inlinetask font-lock-fontified t)))))
(defun org-inlinetask-toggle-visibility ()
"Toggle visibility of inline task at point."
--
1.7.4.4
next reply other threads:[~2011-08-20 11:18 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-08-20 11:18 Suvayu Ali [this message]
2011-08-24 8:39 ` [PATCH] Add customisable face for inlinetasks Bastien
2011-08-24 11:38 ` Suvayu Ali
2011-08-24 13:23 ` Bastien
2011-11-30 21:02 ` Implement a new emphasis style to hide text Stefan Janik
2011-12-01 10:29 ` Eric S Fraga
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20110820131808.31793978@kuru.homelinux.net \
--to=fatkasuvayu+linux@gmail.com \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).