diff options
| author | Glenn Morris <[email protected]> | 2012-12-09 18:00:42 -0800 |
|---|---|---|
| committer | Glenn Morris <[email protected]> | 2012-12-09 18:00:42 -0800 |
| commit | 265c2fbf11cb8bf9b805df63ecb9508631f08e35 (patch) | |
| tree | 808684294d7ec600f5300e0a5d5f868740096f7b /lisp/emacs-lisp/cl.el | |
| parent | 5f460827dd14fbfae26ac8451cedd4446817d1ec (diff) | |
| parent | f433306af510e86a614e9f9f082b6d2d5f56a968 (diff) | |
Merge from emacs-24; up to 2012-11-26T19:56:[email protected]
Diffstat (limited to 'lisp/emacs-lisp/cl.el')
| -rw-r--r-- | lisp/emacs-lisp/cl.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el index 40d12358b1..7241b3c598 100644 --- a/lisp/emacs-lisp/cl.el +++ b/lisp/emacs-lisp/cl.el @@ -83,6 +83,12 @@ ;; (delete-region (1- (point)) (point))) ;; (save-buffer))))) +(defun cl-unload-function () + "Stop unloading of the Common Lisp extensions." + (message "Cannot unload the feature `cl'") + ;; Stop standard unloading! + t) + ;;; Aliases to cl-lib's features. (dolist (var '( @@ -735,4 +741,7 @@ You can replace this macro with `gv-letplace'." (list accessor temp)))) (provide 'cl) + +(run-hooks 'cl-load-hook) + ;;; cl.el ends here |