From: yamaoka <yamaoka>
Date: Mon, 13 Sep 1999 23:41:32 +0000 (+0000)
Subject: (smtpmail-send-it): Remove needless `concat'.
X-Git-Tag: clime-1_13_5~6
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=61fd6caa3f164e83d9e0302434cc909187ec1baa;p=elisp%2Fflim.git

(smtpmail-send-it): Remove needless `concat'.
---

diff --git a/ChangeLog b/ChangeLog
index b327517..c609d5c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+1999-09-14  Katsumi Yamaoka   <yamaoka@jpl.org>
+
+	* smtpmail.el (smtpmail-send-it): Remove needless `concat'.
+
+
 1999-09-13  MORIOKA Tomohiko  <tomo@m17n.org>
 
 	* CLIME: Version 1.13.4 (Shin-Terai) released.
@@ -6,7 +11,7 @@
 
 	* README.en (Installation): Modify for APEL 9.22; modify location
 	of APEL.
-	
+
 1999-09-01  Katsumi Yamaoka   <yamaoka@jpl.org>
 
 	* smtpmail.el (smtpmail-send-it): Make directory
diff --git a/smtpmail.el b/smtpmail.el
index 4ef7161..74638aa 100644
--- a/smtpmail.el
+++ b/smtpmail.el
@@ -234,8 +234,8 @@ This is relative to `smtpmail-queue-dir'.")
 	    (let* ((file-data (convert-standard-filename
 			       (concat
 				(file-name-as-directory smtpmail-queue-dir)
-				(concat (time-stamp-yyyy-mm-dd)
-					"_" (time-stamp-hh:mm:ss)))))
+				(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))