From cc8d8b6fe09d244b0c30ed90a91b820935c4aafe Mon Sep 17 00:00:00 2001 From: Erik Naggum Date: Tue, 2 Jul 1996 00:01:05 +0000 Subject: [PATCH] (require 'cl) is only necessary when compiling. --- lisp/mail/mailheader.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/mail/mailheader.el b/lisp/mail/mailheader.el index fa0265faf41..142b29c4f35 100644 --- a/lisp/mail/mailheader.el +++ b/lisp/mail/mailheader.el @@ -1,4 +1,4 @@ -;;; mail-header.el --- Mail header parsing, merging, formatting +;;; mailheader.el --- Mail header parsing, merging, formatting ;; Copyright (C) 1996 by Free Software Foundation, Inc. @@ -25,7 +25,7 @@ ;;; Commentary: ;; This package provides an abstraction to RFC822-style messages, used in -;; mail news, and some other systems. The simple syntactic rules for such +;; mail, news, and some other systems. The simple syntactic rules for such ;; headers, such as quoting and line folding, are routinely reimplemented ;; in many individual packages. This package removes the need for this ;; redundancy by representing message headers as association lists, @@ -46,7 +46,8 @@ ;;; Code: -(require 'cl) +(eval-when-compile + (require 'cl)) ;; Make the byte-compiler shut up. (defvar headers) @@ -179,4 +180,4 @@ A key of nil has as its value a list of defaulted headers to ignore." (provide 'mailheader) -;;; mail-header.el ends here +;;; mailheader.el ends here -- 2.39.2