From mboxrd@z Thu Jan 1 00:00:00 1970 From: Alexander Baier Subject: Re: Color entries according to assigned priority Date: Fri, 09 May 2014 18:40:13 +0200 Message-ID: <87ha4yrjma.fsf@gmail.com> References: <864n17xs52.fsf@somewhere.org> <87fvkqmtc2.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:57899) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Winrg-0003Mx-Pd for emacs-orgmode@gnu.org; Fri, 09 May 2014 12:41:49 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1WinrX-0006kP-99 for emacs-orgmode@gnu.org; Fri, 09 May 2014 12:41:40 -0400 Received: from mail-qa0-x22a.google.com ([2607:f8b0:400d:c00::22a]:55308) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1WinrX-0006kL-43 for emacs-orgmode@gnu.org; Fri, 09 May 2014 12:41:31 -0400 Received: by mail-qa0-f42.google.com with SMTP id j5so4396017qaq.1 for ; Fri, 09 May 2014 09:41:30 -0700 (PDT) In-Reply-To: (Uwe Ziegenhagen's message of "Thu, 8 May 2014 04:36:37 +0000 (UTC)") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Uwe Ziegenhagen Cc: emacs-orgmode@gnu.org On 2014-05-08 06:36 Uwe Ziegenhagen wrote: > ######################################## > ;; Do not show welcome screen at startup > (setq inhibit-startup-message t) > > ;; just answer Emacs' question with 'y' or 'n' instead of 'yes'or 'no' > (defalias 'yes-or-no-p 'y-or-n-p) > > ;; Load org mode > (add-to-list 'load-path "G:/Programme/emacs-24.3/myLisp/org-8.2.4/lisp") > > (font-lock-add-keywords 'org-mode > '(("^.*:write:.*$" . font-lock-keyword-face))) > > (setq org-agenda-face-for-tagged-lines > '(("write" . bold))) None of the tags in the screenshots is :write:. I do not understand, what you expect to happen here. > (defun org-agenda-fontify-tagged-line () > "Use `org-agenda-face-for-tagged-lines' to fontify lines with certain tags." > (goto-char (point-min)) > (let (tags) > (while (progn (forward-line 1) (not (eobp))) > (if (setq tags (get-text-property (point) 'tags)) > (mapcar > (lambda (pair) > (if (member (car pair) tags) > (add-text-properties (point-at-bol) (point-at-eol) > `(face,(cdr pair))))) > org-agenda-face-for-tagged-lines))))) > > (add-hook 'org-agenda-finalize-hook 'org-agenda-fontify-tagged-line) To me this looks like something that applies to the agenda only. Tagging a headline with the :write: tag and generating an agenda view (e.g. C-c a t) should make those headlines bold. HTH, -- Alexander Baier