From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Akinori MUSHA" Newsgroups: gmane.emacs.bugs Subject: bug#13173: [PATCH] sieve-mode.el: Keywords should be word delimited. Date: Fri, 14 Dec 2012 00:03:13 +0900 Organization: Associated I. Daemons Message-ID: <86y5h2ouz2.knu@iDaemons.org> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 (generated by EMIKO 1.14.1 - "Choanoflagellata") Content-Type: text/plain; charset=US-ASCII X-Trace: ger.gmane.org 1355417840 17335 80.91.229.3 (13 Dec 2012 16:57:20 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Thu, 13 Dec 2012 16:57:20 +0000 (UTC) To: 13173@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Thu Dec 13 17:57:34 2012 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1TjC6I-0000Ob-2c for geb-bug-gnu-emacs@m.gmane.org; Thu, 13 Dec 2012 17:57:34 +0100 Original-Received: from localhost ([::1]:59439 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TjC65-00019a-Ar for geb-bug-gnu-emacs@m.gmane.org; Thu, 13 Dec 2012 11:57:21 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:38334) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TjC60-00015g-Rs for bug-gnu-emacs@gnu.org; Thu, 13 Dec 2012 11:57:19 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1TjC5v-0003aM-Cu for bug-gnu-emacs@gnu.org; Thu, 13 Dec 2012 11:57:16 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:59141) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TjC5v-0003a7-9Y for bug-gnu-emacs@gnu.org; Thu, 13 Dec 2012 11:57:11 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.72) (envelope-from ) id 1TjC6m-0005NZ-3C for bug-gnu-emacs@gnu.org; Thu, 13 Dec 2012 11:58:04 -0500 X-Loop: help-debbugs@gnu.org Resent-From: "Akinori MUSHA" Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 13 Dec 2012 16:58:03 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 13173 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.135541786220612 (code B ref -1); Thu, 13 Dec 2012 16:58:03 +0000 Original-Received: (at submit) by debbugs.gnu.org; 13 Dec 2012 16:57:42 +0000 Original-Received: from localhost ([127.0.0.1]:41154 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1TjC6P-0005MM-DR for submit@debbugs.gnu.org; Thu, 13 Dec 2012 11:57:42 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:35754) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1TjAup-0002xx-Nm for submit@debbugs.gnu.org; Thu, 13 Dec 2012 10:41:41 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1TjAtm-0005kd-4L for submit@debbugs.gnu.org; Thu, 13 Dec 2012 10:40:46 -0500 Original-Received: from lists.gnu.org ([208.118.235.17]:55285) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TjAtm-0005kX-0U for submit@debbugs.gnu.org; Thu, 13 Dec 2012 10:40:34 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:46902) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TjAtd-0000km-So for bug-gnu-emacs@gnu.org; Thu, 13 Dec 2012 10:40:33 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1TjAtY-0005gk-Ro for bug-gnu-emacs@gnu.org; Thu, 13 Dec 2012 10:40:25 -0500 Original-Received: from v055125.ppp.asahi-net.or.jp ([124.155.55.125]:48503 helo=mail.musha.org) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1TjAtY-0005fp-Em for bug-gnu-emacs@gnu.org; Thu, 13 Dec 2012 10:40:20 -0500 Original-Received: from daemon.musha.org (daemon.local.idaemons.org [192.168.11.11]) by mail.musha.org (Postfix) with ESMTP id 3YMdS23mKfz12lS for ; Fri, 14 Dec 2012 00:03:14 +0900 (JST) X-PGP-Public-Key: finger knu@FreeBSD.org X-PGP-Fingerprint: 081D 099C 1705 861D 4B70 B04A 920B EFC7 9FD9 E1EE X-detected-operating-system: by eggs.gnu.org: FreeBSD [generic] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Mailman-Approved-At: Thu, 13 Dec 2012 11:57:39 -0500 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:68462 Archived-At: In sieve-mode, font-lock keywords will wrongly match because the regexp patterns are unaware of word boundaries. For example, if you put an action command "notify", it is highlighted as "not"+"if"+y. Apply the following simple patch to fix that. --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/sieve-mode.el | 9 ++++++--- 2 files changed, 11 insertions(+), 3 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 601ed0c..42b3e59 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2012-12-13 Akinori MUSHA + + * sieve-mode.el (sieve-font-lock-keywords): Keywords should be word + delimited. + 2012-12-06 Sam Steingold * gnus-start.el (gnus-before-resume-hook): Add. diff --git a/lisp/gnus/sieve-mode.el b/lisp/gnus/sieve-mode.el index f49f767..32abbfe 100644 --- a/lisp/gnus/sieve-mode.el +++ b/lisp/gnus/sieve-mode.el @@ -131,14 +131,17 @@ (eval-when-compile (list ;; control commands - (cons (regexp-opt '("require" "if" "else" "elsif" "stop")) + (cons (regexp-opt '("require" "if" "else" "elsif" "stop") + 'words) 'sieve-control-commands-face) ;; action commands - (cons (regexp-opt '("fileinto" "redirect" "reject" "keep" "discard")) + (cons (regexp-opt '("fileinto" "redirect" "reject" "keep" "discard") + 'words) 'sieve-action-commands-face) ;; test commands (cons (regexp-opt '("address" "allof" "anyof" "exists" "false" - "true" "header" "not" "size" "envelope")) + "true" "header" "not" "size" "envelope") + 'words) 'sieve-test-commands-face) (cons "\\Sw+:\\sw+" 'sieve-tagged-arguments-face)))) -- 1.8.0.1 -- Akinori MUSHA / http://akinori.org/