summaryrefslogtreecommitdiff
path: root/lisp/time-stamp.el
diff options
context:
space:
mode:
authorSimon Josefsson <jas@extundo.com>2002-09-12 06:04:10 +0000
committerSimon Josefsson <jas@extundo.com>2002-09-12 06:04:10 +0000
commit7fda10ab2d24cf8f630561732ea8291ffc15a7ec (patch)
treea43ad45dc2921d0737df7a2c250f17ba45a12162 /lisp/time-stamp.el
parentbf6e31bc66f2f0e1ef1bcabc496a214d863b0b24 (diff)
downloademacs-7fda10ab2d24cf8f630561732ea8291ffc15a7ec.tar.gz
(time-stamp-hhmmss): New function.
Diffstat (limited to 'lisp/time-stamp.el')
-rw-r--r--lisp/time-stamp.el4
1 files changed, 4 insertions, 0 deletions
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"))