Require 'cl when compiling.

1 files changed, 3 insertions, 1 deletions

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)))))