From 0d752cda8e9d8a6b927c4ab2d953f7dff64ef3f6 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Wed, 2 Feb 2000 15:20:31 +0000 Subject: [PATCH] Use bytecomp-load-hook, not emacs-lisp-mode-hook. Don't check for defalias being defined. --- lisp/emacs-lisp/cl.el | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) 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 -- 2.39.5