mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(which-func-current, which-func-format):

Browse Source 
Preload the risky-local-variable properties for them.
This commit is contained in:
Richard M. Stallman 2003-05-18 15:07:11 +00:00
parent 62ea130628
commit c34066b763
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/which-func.el
View File

@ -103,7 +103,7 @@ Zero means compute the Imenu menu regardless of size."
"Format for displaying the function in the mode line."
:group 'which-func
:type 'sexp)
(put 'which-func-format 'risky-local-variable t)
;;;###autoload (put 'which-func-format 'risky-local-variable t)
(defvar which-func-cleanup-function nil
"Function to transform a string before displaying it in the mode line.
@ -125,7 +125,7 @@ and you want to simplify them for the mode line
(defconst which-func-current
'(:eval (gethash (selected-window) which-func-table which-func-unknown)))
(put 'which-func-current 'risky-local-variable t)
;;;###autoload (put 'which-func-current 'risky-local-variable t)
(defvar which-func-mode nil
"Non-nil means display current function name in mode line.