From: Andreas Schwab <schwab@suse.de>
Date: Sun, 13 Apr 2008 00:25:41 +0000 (+0000)
Subject: Require 'cl when compiling.
X-Git-Tag: emacs-pretest-23.0.90~6298
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f0d732ae65927cbb3bd17cef564508de0064509c;p=emacs.git

Require 'cl when compiling.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e0bd01cf0cb..d369eb8cbf4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-04-13  Andreas Schwab  <schwab@suse.de>
+
+	* progmodes/etags.el: Require 'cl when compiling.
+
 2008-04-12  Nick Roberts  <nickrob@snap.net.nz>
 
 	* progmodes/gud.el (gud-menu-map): Expand tooltip.
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 88e62b4ec85..5273c685a17 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -29,6 +29,8 @@
 
 ;;; Code:
 
+(eval-when-compile
+  (require 'cl))
 (require 'ring)
 (require 'button)
 
@@ -775,7 +777,7 @@ tags table and its (recursively) included tags tables."
 		  (setq combined-table current-table))))
 	    (message "Making tags completion table for %s...done"
 		     buffer-file-name)
-	    ;; Cache the result a buffer-local variable.
+	    ;; Cache the result in a buffer-local variable.
 	    (setq tags-completion-table combined-table))
 	(quit (message "Tags completion table construction aborted.")
 	      (setq tags-completion-table nil)))))