emacs-bug-tracker
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[debbugs-tracker] bug#13297: closed (hi-lock-unface-buffer fails on face


From: GNU bug Tracking System
Subject: [debbugs-tracker] bug#13297: closed (hi-lock-unface-buffer fails on face lists)
Date: Mon, 28 Jan 2013 20:04:02 +0000

Your message dated Mon, 28 Jan 2013 15:03:13 -0500
with message-id <address@hidden>
and subject line Re: bug#13297: hi-lock-unface-buffer fails on face lists
has caused the debbugs.gnu.org bug report #13297,
regarding hi-lock-unface-buffer fails on face lists
to be marked as done.

(If you believe you have received this mail in error, please contact
address@hidden)


-- 
13297: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=13297
GNU Bug Tracking System
Contact address@hidden with problems
--- Begin Message --- Subject: hi-lock-unface-buffer fails on face lists Date: Fri, 28 Dec 2012 21:21:20 +0100 User-agent: mu4e 0.9.9.5-dev6; emacs 24.3.50.1
Before commit 111129 hi-lock-unface-buffer could handle face symbols as
well as face lists.  After this commit it fails on lists.

Third-party library highlight-symbol uses hi-lock-set-pattern passing it
a face list.  The above change breaks this usage which isn't disallowed
in hi-lock-set-pattern's doc-string.  As a result this library cannot
remove the highlights it added with the help of hi-lock.

  Jonas



--- End Message ---
--- Begin Message --- Subject: Re: bug#13297: hi-lock-unface-buffer fails on face lists Date: Mon, 28 Jan 2013 15:03:13 -0500 User-agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux)
> The problem is due to the mistaken assumption about the nature of face,
> as captured by the comment line below.

Oh, indeed, thank you.  I installed the patch below which should fix it,


        Stefan


=== modified file 'lisp/hi-lock.el'
--- lisp/hi-lock.el     2013-01-02 16:13:04 +0000
+++ lisp/hi-lock.el     2013-01-28 19:59:39 +0000
@@ -562,7 +562,8 @@
     (when keyword
       (let ((face (hi-lock-keyword->face keyword)))
         ;; Make `face' the next one to use by default.
-       (add-to-list 'hi-lock--unused-faces (face-name face)))
+        (when (symbolp face)          ;Don't add it if it's a list (bug#13297).
+          (add-to-list 'hi-lock--unused-faces (face-name face))))
       (font-lock-remove-keywords nil (list keyword))
       (setq hi-lock-interactive-patterns
             (delq keyword hi-lock-interactive-patterns))



--- End Message ---

reply via email to

[Prev in Thread] Current Thread [Next in Thread]