John Wiegley <[EMAIL PROTECTED]> writes:
> This code snippet will modify your agenda buffer upon creation so that the
> string [#A] is bolded, and [#C] is italicized. It keeps whatever color it
> had, it's just now strong or weak based on priority.
Actually, I'm finding I like having the whole title bolded or italicized, just
like Gnus does:
(defun org-fontify-priorities ()
(interactive)
(save-excursion
(let ((inhibit-read-only t))
(goto-char (point-min))
(while (re-search-forward "\\[#\\([A-C]\\)\\]" nil t)
(let ((priority (match-string 1)))
(cond ((string= priority "A")
(overlay-put (make-overlay (match-beginning 0)
;;(match-end 0)
(line-end-position))
'face 'bold))
((string= priority "C")
(overlay-put (make-overlay (match-beginning 0)
;;(match-end 0)
(line-end-position))
'face 'italic))))))))
(add-hook 'org-finalize-agenda-hook 'org-fontify-priorities)
John
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
