# HG changeset patch # User Dave Love # Date 949504831 0 # Node ID 5d6eb73b10d03a825d3bd4e758fa02890b0d7a22 # Parent 65b514b0ab72fce199875508de28f0f5d37e47c0 Use bytecomp-load-hook, not emacs-lisp-mode-hook. Don't check for defalias being defined. diff -r 65b514b0ab72 -r 5d6eb73b10d0 lisp/emacs-lisp/cl.el --- a/lisp/emacs-lisp/cl.el Wed Feb 02 15:11:39 2000 +0000 +++ b/lisp/emacs-lisp/cl.el Wed Feb 02 15:20:31 2000 +0000 @@ -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 @@ (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