Carsten Dominik <carsten.domi...@gmail.com> writes:
Hi Carsten,
> Yes, I think it is fixed now.
Nearly, now the first colon isn't fontified. Here's a patch.
>From 00d7a2bab8c5077eae99760c5f62dd09f4c363a4 Mon Sep 17 00:00:00 2001
From: Tassilo Horn <tass...@member.fsf.org>
Date: Fri, 12 Feb 2010 20:27:49 +0100
Subject: [PATCH] Don't omit the first colon when fontifying tags.
---
lisp/ChangeLog | 5 +++++
lisp/org-agenda.el | 2 +-
2 files changed, 6 insertions(+), 1 deletions(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 31f5fc0..998d541 100755
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-02-12 Tassilo Horn <tass...@member.fsf.org>
+
+ * org-agenda.el (org-agenda-align-tags): Don't omit the first
+ colon when fontifying tags.
+
2010-02-12 Carsten Dominik <carsten.domi...@gmail.com>
* org.el (org-get-location): Make sure the selection buffer is
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 21c605f..5a63e47 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -6376,7 +6376,7 @@ If FORCE-TAGS is non nil, the car of it returns the new tags."
(goto-char (match-beginning 1))
(insert (org-add-props
(make-string (max 1 (- c (current-column))) ?\ )
- (plist-put (text-properties-at (point)) 'face nil))))
+ (plist-put (text-properties-at (1- (point))) 'face nil))))
(goto-char (point-min))
(org-font-lock-add-tag-faces (point-max)))))
--
1.6.6.1
>> BTW: Is it really a good decision to propertize the text algorithmically
>> in the functions building the agenda? I'm not sure, but it might be
>> easier to define some `org-agenda-font-lock-keywords' like it's done for
>> org files, too.
>
> That is a good question. I do, however, not believe that it would
> be easy to define font lock keywords which can handle the agenda.
> For example, when an item changes state, its face is changed, to
> something with depends on where the item comes from and, for example,
> how close the deadline is. And more stuff like that.
> So font-lock regexp matching is now enough here.
> Yes, it would be enough for tags, but not for other stuff.
I see.
Bye,
Tassilo
_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
