From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 15 Oct 1997 23:33:14 +0000 (+0000)
Subject: (smtpmail-send-it): Don't use time-stamp-strftime.
X-Git-Tag: emacs-20.3~3015
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3375a61ce61d19c742b607f462d6a8d58bc670ac;p=emacs.git

(smtpmail-send-it): Don't use time-stamp-strftime.
---

diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index 433c9ec7a93..a3310b79528 100644
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -253,8 +253,8 @@ This is relative to `smtpmail-queue-dir'.")
 		(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))