From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: David C Sterratt Newsgroups: gmane.emacs.help Subject: Re: Font-lock with newcomment.el Date: 30 May 2003 16:20:28 +0100 Organization: School of Informatics, The University of Edinburgh Sender: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Message-ID: References: <5lisrso7uf.fsf@rum.cs.yale.edu> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1054308544 9056 80.91.224.249 (30 May 2003 15:29:04 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Fri, 30 May 2003 15:29:04 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Fri May 30 17:29:02 2003 Return-path: Original-Received: from monty-python.gnu.org ([199.232.76.173]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 19Llmk-0002A4-00 for ; Fri, 30 May 2003 17:27:14 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.20) id 19LlgY-0002uA-8b for gnu-help-gnu-emacs@m.gmane.org; Fri, 30 May 2003 11:20:50 -0400 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!diablo.theplanet.net!news.indigo.ie!feeder.news.heanet.ie!server5.netnews.ja.net!server6.netnews.ja.net!newsfeed.ed.ac.uk!not-for-mail Original-Newsgroups: gnu.emacs.help Original-Lines: 43 Original-NNTP-Posting-Host: canonmills.inf.ed.ac.uk Original-X-Trace: scotsman.ed.ac.uk 1054307971 9972 129.215.29.137 (30 May 2003 15:19:31 GMT) Original-X-Complaints-To: usenet@scotsman.ed.ac.uk Original-NNTP-Posting-Date: Fri, 30 May 2003 15:19:31 +0000 (UTC) User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50 Original-Xref: shelby.stanford.edu gnu.emacs.help:113891 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.help:10385 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:10385 >>>>> Stefan Monnier writes: >> (setq font-lock-defaults `((nnrnhoc-font-lock-keywords) nil nil >> ((?_ . "w") (?\n . "> b") (?/ . ,(if (string-match "XEmacs" >> (emacs-version)) ". 1456" ". 124b")) (?* . ". 23") (?\^m . "> >> b")))) > BTW, setting your syntax-table this way is probably not a good idea > because it will only affect font-locking whereas I suspect that you > might want the rest of Emacs to know about those comments as well > (newcomment.el for example uses the syntax-table (in place of and > in addition to comment-start/end)) so it's better to properly setup > your major mode's syntax-table. Thanks for the advice. The new version looks like this. (setq font-lock-defaults '((nrnhoc-font-lock-keywords) nil ; do not do string/comment highlighting nil ; keywords are case sensitive. nil )) (modify-syntax-entry ?_ "w") (modify-syntax-entry ?\n "> b") (modify-syntax-entry ?/ ( if (string-match "XEmacs" (emacs-version)) ". 1456" ". 124b")) (modify-syntax-entry ?* ". 23") (modify-syntax-entry ?\^m "> b") Much prettier. And it seems to work too. > Oh, and David, regarding your mode: do a C-h f looking-at, that > will save you a bunch of buffer-substrings. Thanks for looking at the code. From the looking-at documentation, it seems like it only matches regexps after the point, whereas in the current way of doing indentation I need to match symbols anywhere in the line, in most cases at least. So it's not clear to me how looking-at will help, unless I rethink the indentation code. David