Mercurial > hg > xemacs-beta
diff lisp/gnus/mailheader.el @ 30:ec9a17fef872 r19-15b98
Import from CVS: tag r19-15b98
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:52:29 +0200 |
parents | 0293115a14e9 |
children | 131b0175ea99 |
line wrap: on
line diff
--- a/lisp/gnus/mailheader.el Mon Aug 13 08:51:58 2007 +0200 +++ b/lisp/gnus/mailheader.el Mon Aug 13 08:52:29 2007 +0200 @@ -62,7 +62,7 @@ (> (skip-chars-forward "^\0- :") 0) (= (following-char) ?:) (setq end (point)) - (progn (forward-char) + (progn (forward-char) (> (skip-chars-forward " \t") 0))) (let ((header (intern (downcase (buffer-substring start end)))) (value (list (buffer-substring