From 9c48c2d0cd1604f30884219a536d0c3c4048330e Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Mon, 31 Jan 2011 18:19:09 -0800 Subject: [PATCH] (article-date-ut): Protect against articles with no Date header. --- lisp/ChangeLog | 3 +++ lisp/gnus-art.el | 3 ++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 54f5c3b53..f24ce7fe7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2011-02-01 Lars Ingebrigtsen + * gnus-art.el (article-date-ut): Protect against articles with no Date + header. + * gnus-start.el (gnus-read-active-file-1): Remove dead parameter infos. 2011-01-31 Lars Ingebrigtsen diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index a76a71be6..07eabd98a 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -3443,7 +3443,8 @@ possible values." (delete-region (point-at-bol) (progn (gnus-article-forward-header) (point)))) - (article-transform-date date type bface eface)))))) + (when date + (article-transform-date date type bface eface))))))) (defun article-transform-date (date type bface eface) (dolist (this-type (cond -- 2.34.1