[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/progmodes/which-func.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/progmodes/which-func.el |
Date: |
Tue, 14 Jun 2005 20:14:43 -0400 |
Index: emacs/lisp/progmodes/which-func.el
diff -c emacs/lisp/progmodes/which-func.el:1.9
emacs/lisp/progmodes/which-func.el:1.10
*** emacs/lisp/progmodes/which-func.el:1.9 Sun May 29 08:31:54 2005
--- emacs/lisp/progmodes/which-func.el Wed Jun 15 00:14:41 2005
***************
*** 113,129 ****
map)
"Keymap to display on mode line which-func.")
! (defface which-func-face
'((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)
(defcustom which-func-format
`("["
(:propertize which-func-current
local-map ,which-func-keymap
! face which-func-face
;;mouse-face highlight ; currently not evaluated :-(
help-echo "mouse-1: go to beginning, mouse-2: toggle rest
visibility, mouse-3: go to end")
"]")
--- 113,131 ----
map)
"Keymap to display on mode line which-func.")
! (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
;;mouse-face highlight ; currently not evaluated :-(
help-echo "mouse-1: go to beginning, mouse-2: toggle rest
visibility, mouse-3: go to end")
"]")
- [Emacs-diffs] Changes to emacs/lisp/progmodes/which-func.el,
Miles Bader <=