Mercurial > emacs
comparison lisp/novice.el @ 64513:d96725e9e9a8
(disabled-command-hook): Declare it with `define-obsolete-variable-alias'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Tue, 19 Jul 2005 14:55:04 +0000 |
| parents | 6fb026ad601f |
| children | 41bb365f41c4 187d6a1f84f7 |
comparison
equal
deleted
inserted
replaced
| 64512:a4d1eb8d55e6 | 64513:d96725e9e9a8 |
|---|---|
| 40 (defvar disabled-command-function 'disabled-command-function | 40 (defvar disabled-command-function 'disabled-command-function |
| 41 "Function to call to handle disabled commands. | 41 "Function to call to handle disabled commands. |
| 42 If nil, the feature is disabled, i.e., all commands work normally.") | 42 If nil, the feature is disabled, i.e., all commands work normally.") |
| 43 | 43 |
| 44 ;;;###autoload | 44 ;;;###autoload |
| 45 (defvaralias 'disabled-command-hook 'disabled-command-function) | 45 (define-obsolete-variable-alias 'disabled-command-hook 'disabled-command-function "22.1") |
| 46 ;;;###autoload (make-obsolete-variable 'disabled-command-hook 'disabled-command-function "22.1") | |
| 47 | 46 |
| 48 ;;;###autoload | 47 ;;;###autoload |
| 49 (defun disabled-command-function (&rest ignore) | 48 (defun disabled-command-function (&rest ignore) |
| 50 (let (char) | 49 (let (char) |
| 51 (save-window-excursion | 50 (save-window-excursion |