procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make tracking faces in Emacs work more reliably

Browse source 
* lisp/erc/erc-track.el (erc-faces-in): Always return lists of
faces to avoid later ambiguity (bug#22424).

Copyright-paperwork-exempt: Yes
This commit is contained in:
Kevin Brubeck Unhammer 2016-02-04 16:49:42 +11:00 • committed by Lars Ingebrigtsen
parent af6ab7efc7
commit d93d2c5b16
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/erc/erc-track.el
View file

@ -971,7 +971,8 @@ is in `erc-mode'."
"Return a list of all faces used in STR."
(let ((i 0)
(m (length str))
(faces (erc-list (get-text-property 0 'face str)))
(faces (let ((face1 (get-text-property 0 'face str)))
(when face1 (list face1))))
cur)
(while (and (setq i (next-single-property-change i 'face str m))
(not (= i m)))