summaryrefslogtreecommitdiff
path: root/lisp/progmodes/which-func.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2005-06-15 00:14:41 +0000
committerMiles Bader <miles@gnu.org>2005-06-15 00:14:41 +0000
commit9ce2eb5ebbfda09baafdc5b1cb8f807192f96bfe (patch)
treed0040673be9f7040b8b798f887d424d0f9cb61ce /lisp/progmodes/which-func.el
parent63a5fd63030a0ca98c1a1ab3410cdb7721e77924 (diff)
downloademacs-9ce2eb5ebbfda09baafdc5b1cb8f807192f96bfe.tar.gz
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-417
Remove "-face" suffix from which-func face 2005-06-14 Miles Bader <miles@gnu.org> * lisp/progmodes/which-func.el (which-func): Remove "-face" suffix from face name. (which-func-face): New backward-compatibility alias for renamed face. (which-func-format): Use renamed which-func face.
Diffstat (limited to 'lisp/progmodes/which-func.el')
-rw-r--r--lisp/progmodes/which-func.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/progmodes/which-func.el b/lisp/progmodes/which-func.el
index 1fa37532ab0..960eec2208c 100644
--- a/lisp/progmodes/which-func.el
+++ b/lisp/progmodes/which-func.el
@@ -113,17 +113,19 @@ Zero means compute the Imenu menu regardless of size."
map)
"Keymap to display on mode line which-func.")
-(defface which-func-face
+(defface which-func
'((t (:inherit font-lock-function-name-face)))
"Face used to highlight mode line function names.
Defaults to `font-lock-function-name-face' if font-lock is loaded."
:group 'which-func)
+;; backward-compatibility alias
+(put 'which-func-face 'face-alias 'which-func)
(defcustom which-func-format
`("["
(:propertize which-func-current
local-map ,which-func-keymap
- face which-func-face
+ face which-func
;;mouse-face highlight ; currently not evaluated :-(
help-echo "mouse-1: go to beginning, mouse-2: toggle rest visibility, mouse-3: go to end")
"]")