From: Glenn Morris <rgm@gnu.org>
Date: Wed, 16 Jul 2008 02:50:00 +0000 (+0000)
Subject: Simply require 'cl (silences spurious warnings).
X-Git-Tag: emacs-pretest-23.0.90~4159
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=56565c745b778d21d0cebe75d765dce4fb2a3cd8;p=emacs.git

Simply require 'cl (silences spurious warnings).
(cl-compile-time-init): Remove function.
---

diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
index 121bd5eea3b..9ca675f08c4 100644
--- a/lisp/emacs-lisp/cl-macs.el
+++ b/lisp/emacs-lisp/cl-macs.el
@@ -43,9 +43,7 @@
 
 ;;; Code:
 
-(or (memq 'cl-19 features)
-    (error "Tried to load `cl-macs' before `cl'!"))
-
+(require 'cl)
 
 (defmacro cl-pop2 (place)
   (list 'prog1 (list 'car (list 'cdr place))
@@ -73,11 +71,6 @@
 
 (defvar cl-old-bc-file-form nil)
 
-;;;###autoload
-(defun cl-compile-time-init ()
-  (run-hooks 'cl-hack-bytecomp-hook))
-
-
 ;;; Some predicates for analyzing Lisp forms.  These are used by various
 ;;; macro expanders to optimize the results in certain common cases.