[gnus git] branch master updated: =1= gnus-art.el (article-make-date-line): Work for user-defined format.
Katsumi Yamaoka <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 3a7fa151831d10f9629d5ce941cf929fa842cf53 (commit)
from 69c9bea830571514039117707ae832260454e709 (commit)
- Log -----------------------------------------------------------------
commit 3a7fa151831d10f9629d5ce941cf929fa842cf53
Author: Katsumi Yamaoka <[email protected]>
Date: Mon Jan 31 02:47:15 2011 +0000
gnus-art.el (article-make-date-line): Work for user-defined format.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f9dbec8..51b0359 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-01-31 Katsumi Yamaoka <[email protected]>
+
+ * gnus-art.el (article-make-date-line): Work for user-defined format.
+
2011-01-31 Lars Ingebrigtsen <[email protected]>
* gnus-start.el (gnus-read-active-for-groups): Read the active files
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index e0ff5f2..7fba448 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -3480,7 +3480,7 @@ possible values."
(defun article-make-date-line (date type)
"Return a DATE line of TYPE."
(unless (memq type '(local ut original user iso8601 lapsed english
- combined-lapsed))
+ combined-lapsed user-defined))
(error "Unknown conversion type: %s" type))
(condition-case ()
(let ((time (date-to-time date)))
@@ -3508,7 +3508,7 @@ possible values."
(substring date 0 (match-beginning 0))
date)))
;; Let the user define the format.
- ((eq type 'user)
+ ((eq type 'user-defined)
(let ((format (or (condition-case nil
(with-current-buffer gnus-summary-buffer
gnus-article-time-format)
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 4 ++++
lisp/gnus-art.el | 4 ++--
2 files changed, 6 insertions(+), 2 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project