From: Simon Josefsson <jas@extundo.com>
Date: Thu, 12 Sep 2002 06:04:10 +0000 (+0000)
Subject: (time-stamp-hhmmss): New function.
X-Git-Tag: ttn-vms-21-2-B4~13206
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7fda10ab2d24cf8f630561732ea8291ffc15a7ec;p=emacs.git

(time-stamp-hhmmss): New function.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index be21078b15d..9c346ac49a8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2002-09-12  Simon Josefsson  <jas@extundo.com>
+
+	* mail/smtpmail.el (smtpmail-send-it): Don't use : in filenames
+	(for cygwin). Suggested by Andrew Senior <aws@watson.ibm.com>.
+	Use expand-file-name.  Also don't require time-stamp.
+
 2002-09-11  Richard M. Stallman  <rms@gnu.org>
 
 	* derived.el (define-derived-mode): When making new abbrev table,
@@ -42,6 +48,8 @@
 
 2002-09-11  Simon Josefsson  <jas@extundo.com>
 
+	* time-stamp.el (time-stamp-hhmmss): New function.
+
 	* gud.el (gud-gdb-massage-args): Don't secretly add -fullname.
 	(gud-query-cmdline): Add --fullname to the user cmdline.
 
diff --git a/lisp/time-stamp.el b/lisp/time-stamp.el
index d86dd976572..8f07f714eda 100644
--- a/lisp/time-stamp.el
+++ b/lisp/time-stamp.el
@@ -731,6 +731,10 @@ The first character of DD is space if the value is less than 10."
   "Return the current time as a string in \"HH:MM:SS\" form."
   (format-time-string "%T"))
 
+(defun time-stamp-hhmmss ()
+  "Return the current time as a string in \"HHMMSS\" form."
+  (format-time-string "%H%M%S"))
+
 (defun time-stamp-hhmm ()
   "Return the current time as a string in \"HHMM\" form."
   (format-time-string "%H%M"))