Mercurial > emacs

diff lisp/mail/smtpmail.el @ 20058:7077ba8a265b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(smtpmail-send-it): Don't use time-stamp-strftime.
author Karl Heuer <kwzh@gnu.org>
date Wed, 15 Oct 1997 23:33:14 +0000
parents 54cf1b43247b
children dfb671ba22f8
line wrap: on
line diff
--- a/lisp/mail/smtpmail.el	Wed Oct 15 23:28:06 1997 +0000
+++ b/lisp/mail/smtpmail.el	Wed Oct 15 23:33:14 1997 +0000
@@ -253,8 +253,8 @@
 		(error "Sending failed; no recipients"))
 	    (let* ((file-data (concat 
 			       smtpmail-queue-dir
-			       (time-stamp-strftime 
-				"%02y%02m%02d-%02H%02M%02S")))
+			       (concat (time-stamp-yyyy-mm-dd)
+				       "_" (time-stamp-hh:mm:ss))))
 		   (file-elisp (concat file-data ".el"))
 		   (buffer-data (create-file-buffer file-data))
 		   (buffer-elisp (create-file-buffer file-elisp))