From mboxrd@z Thu Jan 1 00:00:00 1970 From: Uwe Brauer Subject: how to set faces? Date: Mon, 27 Sep 2010 12:24:41 +0200 Message-ID: <878w2nxz4m.fsf@gilgamesch.quim.ucm.es> Reply-To: Uwe Brauer Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Return-path: Received: from [140.186.70.92] (port=38350 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1P0AtO-0005P0-Rj for emacs-orgmode@gnu.org; Mon, 27 Sep 2010 06:25:08 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1P0AtN-0006K2-Rf for emacs-orgmode@gnu.org; Mon, 27 Sep 2010 06:25:06 -0400 Received: from lo.gmane.org ([80.91.229.12]:52989) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1P0AtN-0006Js-Lx for emacs-orgmode@gnu.org; Mon, 27 Sep 2010 06:25:05 -0400 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1P0AtL-0001sL-RK for emacs-orgmode@gnu.org; Mon, 27 Sep 2010 12:25:03 +0200 Received: from gilgamesch.quim.ucm.es ([147.96.12.99]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 27 Sep 2010 12:25:03 +0200 Received: from oub by gilgamesch.quim.ucm.es with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 27 Sep 2010 12:25:03 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org Hello The following setting works in lisp mode (let ((lisp-regexp-4 " ?\\(\\<\\*[a-zA-Z]*\\*\\>\\)")) (setq lisp-font-lock-keywords-1 (append lisp-font-lock-keywords-1 (list (list lisp-regexp-4 0 'font-lock-log-warn-face t)))) (setq lisp-font-lock-keywords-2 (append lisp-font-lock-keywords-2 (list (list lisp-regexp-4 0 'font-lock-log-warn-face t))))) Every word surrounded by an * gets highlighted by the font-lock-log-warn-face. I tried something similar for org-mode, like (let ((lisp-regexp-4 " ?\\(\\<\\*[a-zA-Z]*\\*\\>\\)")) (setq org-font-lock-keywords (append lisp-font-lock-keywords-1 (list (list lisp-regexp-4 0 'font-lock-comment-warn-face t))))) Or (add-to-list 'org-font-lock-keywords '(" ?\\(\\<\\*[a-zA-Z]*\\*\\>\\)" 1 'font-lock-comment-warn-face append t)) But it does not work, Can somebody give me a hint please? Uwe Brauer