From 31a27d600843b64b37217e34cc25938ccf3832fd Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 19 Nov 1999 13:14:59 +0000 Subject: [PATCH] (cl): Enclose the requiring procedure with `eval-when-compile'. --- lisp/gnus-offline.el | 4 ++-- lisp/mailheader.el | 2 +- lisp/nnvirtual.el | 2 +- lisp/rfc2104.el | 2 +- lisp/smiley.el | 2 +- 5 files changed, 6 insertions(+), 6 deletions(-) diff --git a/lisp/gnus-offline.el b/lisp/gnus-offline.el index 117c536..909c581 100644 --- a/lisp/gnus-offline.el +++ b/lisp/gnus-offline.el @@ -1,5 +1,5 @@ ;;; gnus-offline.el --- To process mail & news at offline environment. -;;; $Id: gnus-offline.el,v 1.1.2.5.2.36.4.8 1999-10-24 10:26:31 czkmt Exp $ +;;; $Id: gnus-offline.el,v 1.1.2.5.2.36.4.9 1999-11-19 13:14:59 yamaoka Exp $ ;;; Copyright (C) 1998 Tatsuya Ichikawa ;;; Yukihiro Ito @@ -78,7 +78,7 @@ (eval '(run-hooks 'gnus-offline-load-hook)) -(require 'cl) +(eval-when-compile (require 'cl)) (require 'custom) (require 'easymenu) (provide 'gnus-offline) diff --git a/lisp/mailheader.el b/lisp/mailheader.el index 6eb5669..796ae75 100644 --- a/lisp/mailheader.el +++ b/lisp/mailheader.el @@ -46,7 +46,7 @@ ;;; Code: -(require 'cl) +(eval-when-compile (require 'cl)) ;; Make the byte-compiler shut up. (defvar headers) diff --git a/lisp/nnvirtual.el b/lisp/nnvirtual.el index 19fa59f..fd25bf6 100644 --- a/lisp/nnvirtual.el +++ b/lisp/nnvirtual.el @@ -31,6 +31,7 @@ ;;; Code: +(eval-when-compile (require 'cl)) (require 'nntp) (require 'nnheader) (require 'gnus) @@ -39,7 +40,6 @@ (require 'gnus-start) (require 'gnus-sum) (require 'gnus-msg) -(require 'cl) (nnoo-declare nnvirtual) diff --git a/lisp/rfc2104.el b/lisp/rfc2104.el index dd4d5ac..c7ce5ab 100644 --- a/lisp/rfc2104.el +++ b/lisp/rfc2104.el @@ -44,7 +44,7 @@ ;;; 1998-09-25 renamed from hmac.el to rfc2104.el, also renamed functions ;;; 1999-10-23 included in pgnus -(require 'cl) +(eval-when-compile (require 'cl)) ;; Magic character for inner HMAC round. 0x36 == 54 == '6' (defconst rfc2104-ipad ?\x36) diff --git a/lisp/smiley.el b/lisp/smiley.el index 1ad2948..76b2884 100644 --- a/lisp/smiley.el +++ b/lisp/smiley.el @@ -35,9 +35,9 @@ ;; The smilies were drawn by Joe Reiss . +(eval-when-compile (require 'cl)) (require 'annotations) (require 'messagexmas) -(require 'cl) (require 'custom) (defgroup smiley nil -- 1.7.10.4