GNU bug report logs - #14179
[PATCH] hi-lock: more appropriate use of font-locking

Previous Next

Full log

View this message in rfc822 format

From: help-debbugs <at> gnu.org (GNU bug Tracking System)
To: E Sabof <esabof <at> gmail.com>
Subject: bug#14179: closed (Re: bug#14179: [PATCH] hi-lock: more
 appropriate use of font-locking)
Date: Fri, 20 Dec 2013 19:48:02 +0000

[Message part 1 (text/plain, inline)]

Your bug report

#14179: [PATCH] hi-lock: more appropriate use of font-locking

which was filed against the emacs package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to 14179 <at> debbugs.gnu.org.

-- 
14179: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=14179
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems

[Message part 2 (message/rfc822, inline)]

From: Juri Linkov <juri <at> jurta.org>
To: E Sabof <esabof <at> gmail.com>
Cc: 14179-done <at> debbugs.gnu.org
Subject: Re: bug#14179: [PATCH] hi-lock: more appropriate use of font-locking
Date: Fri, 20 Dec 2013 21:47:16 +0200

> Most modes that use custom fontification (ex occur-mode), won't turn the
> font-lock-mode off. So hi-lock would add a keyword, and remove all existing
> fontification. The below patch fixes this behaviour.

Thanks, fixed.

[Message part 3 (message/rfc822, inline)]

From: E Sabof <esabof <at> gmail.com>
To: bug-gnu-emacs <at> gnu.org
Subject: [PATCH] hi-lock: more appropriate use of font-locking
Date: Thu, 11 Apr 2013 05:19:13 +0100

[Message part 4 (text/plain, inline)]

Most modes that use custom fontification (ex occur-mode), won't turn the
font-lock-mode off. So hi-lock would add a keyword, and remove all existing
fontification. The below patch fixes this behaviour.

Evgeni

Modified   lisp/hi-lock.el
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el
index e2dc4ea..e16ed76 100644
--- a/lisp/hi-lock.el
+++ b/lisp/hi-lock.el
@@ -689,7 +689,7 @@ Otherwise, read face name from minibuffer with
completion and history."
     ;; Refuse to highlight a text that is already highlighted.
     (unless (assoc regexp hi-lock-interactive-patterns)
       (push pattern hi-lock-interactive-patterns)
-      (if font-lock-mode
+      (if (and font-lock-mode (font-lock-specified-p major-mode))
   (progn
     (font-lock-add-keywords nil (list pattern) t)
     (font-lock-fontify-buffer))

[Message part 5 (text/html, inline)]

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.