Require cl at compile time.

diff --git a/lisp/gnus/gnus-int.el b/lisp/gnus/gnus-int.el
index 8839943e06a3d2d0d81a644f5338c65b6ae72857..70d147fda0eef632cd4f4cbd341612b549ab1362 100644 (file)
--- a/lisp/gnus/gnus-int.el
+++ b/lisp/gnus/gnus-int.el
@@ -25,6 +25,8 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))
+
 (require 'gnus)
 
 (defcustom gnus-open-server-hook nil

diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el
index 6289778d5dd1ad155ca99f37cf5902517df3d58d..efbb5e0333a47ce5d79e52ea32eb71e3cbcf8804 100644 (file)
--- a/lisp/gnus/gnus-msg.el
+++ b/lisp/gnus/gnus-msg.el
@@ -26,6 +26,8 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))
+
 (require 'gnus)
 (require 'gnus-ems)
 (require 'message)

diff --git a/lisp/gnus/gnus-undo.el b/lisp/gnus/gnus-undo.el
index ebae58e300219b8340e9d63d9aacc5646a319878..4ce5d92a1e49937fe7aadd8f8f71a8e872428fd8 100644 (file)
--- a/lisp/gnus/gnus-undo.el
+++ b/lisp/gnus/gnus-undo.el
@@ -44,6 +44,8 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))
+
 (require 'gnus-util)
 (require 'gnus)