From mboxrd@z Thu Jan 1 00:00:00 1970 From: "Brian J. Carlson" Subject: Issue with org-fontify-done-headline Date: Wed, 18 Jan 2012 16:11:02 -0500 Message-ID: <87boq0af89.fsf@briancarlson.org> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([140.186.70.92]:47564) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Rndmg-0005b9-13 for emacs-orgmode@gnu.org; Wed, 18 Jan 2012 17:15:10 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Rndme-0006k9-71 for emacs-orgmode@gnu.org; Wed, 18 Jan 2012 17:15:09 -0500 Received: from lo.gmane.org ([80.91.229.12]:51005) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Rndme-0006jo-0h for emacs-orgmode@gnu.org; Wed, 18 Jan 2012 17:15:08 -0500 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1Rndmb-0000lP-LD for emacs-orgmode@gnu.org; Wed, 18 Jan 2012 23:15:05 +0100 Received: from 69.84.133.248 ([69.84.133.248]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 18 Jan 2012 23:15:05 +0100 Received: from gmane.briancarlson by 69.84.133.248 with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 18 Jan 2012 23:15:05 +0100 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: emacs-orgmode@gnu.org In the latest git version of org I've been having problems with org-fontify-done-headline. After looking at (defun org-set-font-lock-defaults () I think there is a problem with the following code. --8<---------------cut here---------------start------------->8--- ;; DONE (if org-fontify-done-headline (list (format org-heading-keyword-regexp-format (concat "\\(" (mapconcat 'regexp-quote org-done-keywords "\\|") "\\)")) '(2 'org-headline-done t)) nil) --8<---------------cut here---------------end--------------->8--- I guess there are two ways to fix this: ,---- | (if org-fontify-done-headline | (list (format org-heading-keyword-regexp-format | (concat | "\\(" | (mapconcat 'regexp-quote org-done-keywords "\\|") | "\\)")) | '(3 'org-headline-done t)) | nil) `---- or ,---- | (if org-fontify-done-headline | (list (format org-heading-keyword-regexp-format | (concat | "\\(?:" | (mapconcat 'regexp-quote org-done-keywords "\\|") | "\\)")) | '(2 'org-headline-done t)) | nil) `---- I have only gotten around to using "git clone", so I thought I'd post here until I have a chance to learn how to issue a git push/pull request. -- Thanks, ;-b Brian Carlson