Use bytecomp-load-hook, not emacs-lisp-mode-hook.

Don't check for defalias being defined.
This commit is contained in:
Dave Love 2000-02-02 15:20:31 +00:00
parent 65d68537af
commit 0d752cda8e

View file

@ -93,8 +93,6 @@
;;; Code:
(or (fboundp 'defalias) (fset 'defalias 'fset))
(defvar cl-optimize-speed 1)
(defvar cl-optimize-safety 1)
@ -670,12 +668,7 @@ Keywords supported: :test :test-not :key"
(cl-hack-byte-compiler)
;;; Also make a hook in case compiler is loaded after this file.
;;; The compiler doesn't call any hooks when it loads or runs, but
;;; we can take advantage of the fact that emacs-lisp-mode will be
;;; called when the compiler reads in the file to be compiled.
;;; BUG: If the first compilation is `byte-compile' rather than
;;; `byte-compile-file', we lose. Oh, well.
(add-hook 'emacs-lisp-mode-hook 'cl-hack-byte-compiler)
(add-hook 'bytecomp-load-hook 'cl-hack-byte-compiler)
;;; The following ensures that packages which expect the old-style cl.el