From: Richard M. Stallman Date: Sun, 18 May 2003 15:07:11 +0000 (+0000) Subject: (which-func-current, which-func-format): X-Git-Tag: ttn-vms-21-2-B4~10100 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c34066b7636062189bec4e45768d733f43356e00;p=emacs.git (which-func-current, which-func-format): Preload the risky-local-variable properties for them. --- diff --git a/lisp/which-func.el b/lisp/which-func.el index 57e9463f444..d6bc88c37ca 100644 --- a/lisp/which-func.el +++ b/lisp/which-func.el @@ -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.