From: Dave Love <fx@gnu.org>
Date: Wed, 2 Feb 2000 15:20:31 +0000 (+0000)
Subject: Use bytecomp-load-hook, not emacs-lisp-mode-hook.
X-Git-Tag: emacs-pretest-21.0.90~5118
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0d752cda8e9d8a6b927c4ab2d953f7dff64ef3f6;p=emacs.git

Use bytecomp-load-hook, not emacs-lisp-mode-hook.
Don't check for defalias being defined.
---

diff --git a/lisp/emacs-lisp/cl.el b/lisp/emacs-lisp/cl.el
index 49a07a2f6d1..830a3e8d1ff 100644
--- a/lisp/emacs-lisp/cl.el
+++ b/lisp/emacs-lisp/cl.el
@@ -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