diff options
| -rw-r--r-- | lisp/which-func.el | 4 |
1 files changed, 2 insertions, 2 deletions
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." | |||
| 103 | "Format for displaying the function in the mode line." | 103 | "Format for displaying the function in the mode line." |
| 104 | :group 'which-func | 104 | :group 'which-func |
| 105 | :type 'sexp) | 105 | :type 'sexp) |
| 106 | (put 'which-func-format 'risky-local-variable t) | 106 | ;;;###autoload (put 'which-func-format 'risky-local-variable t) |
| 107 | 107 | ||
| 108 | (defvar which-func-cleanup-function nil | 108 | (defvar which-func-cleanup-function nil |
| 109 | "Function to transform a string before displaying it in the mode line. | 109 | "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 | |||
| 125 | 125 | ||
| 126 | (defconst which-func-current | 126 | (defconst which-func-current |
| 127 | '(:eval (gethash (selected-window) which-func-table which-func-unknown))) | 127 | '(:eval (gethash (selected-window) which-func-table which-func-unknown))) |
| 128 | (put 'which-func-current 'risky-local-variable t) | 128 | ;;;###autoload (put 'which-func-current 'risky-local-variable t) |
| 129 | 129 | ||
| 130 | (defvar which-func-mode nil | 130 | (defvar which-func-mode nil |
| 131 | "Non-nil means display current function name in mode line. | 131 | "Non-nil means display current function name in mode line. |