Synch with Wanderlust.

[elisp/gnus.git-] / lisp / mailheader.el

diff --git a/lisp/mailheader.el b/lisp/mailheader.el
index 5e2b097..796ae75 100644 (file)
--- 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)
@@ -60,7 +60,7 @@ that name."
        start end)
     (while (and (setq start (point))
                (> (skip-chars-forward "^\0- :") 0)
-               (= (following-char) ?:)
+               (eq (char-after) ?:)
                (setq end (point))
                (progn (forward-char)
                       (> (skip-chars-forward " \t") 0)))