From: Glenn Morris <rgm@gnu.org>
Date: Fri, 6 Feb 2009 07:33:20 +0000 (+0000)
Subject: (unrmail): Use current-time-string.
X-Git-Tag: emacs-pretest-23.0.91~386
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=81d8114e203ba2c9dc71ab82ecd6d4f653466f64;p=emacs.git

(unrmail): Use current-time-string.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 76b55d3c4aa..bd205450369 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2009-02-06  Glenn Morris  <rgm@gnu.org>
 
+	* mail/unrmail.el (unrmail): Use current-time-string.
+
 	* simple.el (kill-whole-line): Provide a default argument of 1.
 
 	* mail/undigest.el (rmail-mail-separator): Delete.
diff --git a/lisp/mail/unrmail.el b/lisp/mail/unrmail.el
index bd000deddd2..395e7d2e2e6 100644
--- a/lisp/mail/unrmail.el
+++ b/lisp/mail/unrmail.el
@@ -194,8 +194,7 @@ For example, invoke `emacs -batch -f batch-unrmail RMAIL'."
 				  (or
 				   (and date
 					(ignore-errors
-					 (format-time-string
-					  "%a %b %e %T %Y"
+					 (current-time-string
 					  (date-to-time date))))
 				   (current-time-string))))))