[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/cl.el

[Richard M . Stallman]

Index: emacs/lisp/emacs-lisp/cl.el
diff -c emacs/lisp/emacs-lisp/cl.el:1.39 emacs/lisp/emacs-lisp/cl.el:1.40
*** emacs/lisp/emacs-lisp/cl.el:1.39    Fri Jan 16 18:20:00 2004
--- emacs/lisp/emacs-lisp/cl.el Sat Oct 16 15:21:10 2004
***************
*** 108,115 ****
  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.")
  (defun cl-cannot-unload ()
    (error "Cannot unload the feature `cl'"))
  
--- 108,114 ----
  This variable is not used at present, but it is defined in hopes that
  a future Emacs interpreter will be able to use it.")
  
! (add-hook 'cl-unload-hook 'cl-cannot-unload)
  (defun cl-cannot-unload ()
    (error "Cannot unload the feature `cl'"))