]> git.eshelyaron.com Git - emacs.git/commit
* lisp/replace.el (list-matching-lines-prefix-face): New defcustom.
authorJuri Linkov <juri@jurta.org>
Sun, 24 Mar 2013 21:47:52 +0000 (23:47 +0200)
committerJuri Linkov <juri@jurta.org>
Sun, 24 Mar 2013 21:47:52 +0000 (23:47 +0200)
commitddfa3cb434de08256f7934a4255133fac2995ee3
tree7d1a062442b8533e7d745cbdeb7d6b23a3b47b7f
parent8d0c20aefa1f0fa2af05f6fb0b308e7fd3509b76
* lisp/replace.el (list-matching-lines-prefix-face): New defcustom.
(occur-1): Pass `list-matching-lines-prefix-face' to the function
`occur-engine' if `face-differs-from-default-p' returns t.
(occur-engine): Add `,' inside backquote construct to evaluate
`prefix-face'.  Propertize the prefix with the `prefix-face' face.
Pass `prefix-face' to the functions `occur-context-lines' and
`occur-engine-add-prefix'.
(occur-engine-add-prefix, occur-context-lines): Add optional arg
`prefix-face' and propertize the prefix with `prefix-face'.

Fixes: debbugs:14017
lisp/ChangeLog
lisp/replace.el