Mercurial > emacs
changeset 57519:817362bee028
(cl-unload-hook): Don't defvar it, just set it.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 16 Oct 2004 15:21:10 +0000 |
| parents | 25bf13fe1c10 |
| children | b7788b1f6e70 |
| files | lisp/emacs-lisp/cl.el |
| diffstat | 1 files changed, 1 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl.el Sat Oct 16 15:20:24 2004 +0000 +++ b/lisp/emacs-lisp/cl.el Sat Oct 16 15:21:10 2004 +0000 @@ -108,8 +108,7 @@ This variable is not used at present, but it is defined in hopes that a future Emacs interpreter will be able to use it.") -(defvar cl-unload-hook '(cl-cannot-unload) - "Prevent unloading the feature `cl', since it does not work.") +(add-hook 'cl-unload-hook 'cl-cannot-unload) (defun cl-cannot-unload () (error "Cannot unload the feature `cl'"))