summaryrefslogtreecommitdiff
path: root/lisp/time-stamp.el
diff options
context:
space:
mode:
authorSimon Josefsson <jas@extundo.com>2002-09-12 06:03:49 +0000
committerSimon Josefsson <jas@extundo.com>2002-09-12 06:03:49 +0000
commitb72de161f8bf9e885b16af3afa507487a41cd073 (patch)
tree32f2c5aa57e9c202e3f0916d30d322cec18c45c7 /lisp/time-stamp.el
parente7246ff589e1ca4462be60350a80b91387ab83c5 (diff)
downloademacs-b72de161f8bf9e885b16af3afa507487a41cd073.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"))