# HG changeset patch # User Richard M. Stallman # Date 1053270431 0 # Node ID 20b5efbd58c671d3fa15b1142676ebe6a9c4d52b # Parent 4441e202a6f4367845eadff2399244089a388848 (which-func-current, which-func-format): Preload the risky-local-variable properties for them. diff -r 4441e202a6f4 -r 20b5efbd58c6 lisp/which-func.el --- a/lisp/which-func.el Sun May 18 15:04:24 2003 +0000 +++ b/lisp/which-func.el Sun May 18 15:07:11 2003 +0000 @@ -103,7 +103,7 @@ "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 @@ (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.