Commits

Anonymous committed 6336ac6

2002-09-11 Simon Josefsson <jas@extundo.com>

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

xemacs-patches <ilu7khtkset.fsf@latte.josefsson.org>

  • Participants
  • Parent commits 0c8121a

Comments (0)

Files changed (2)

+2002-09-11  Simon Josefsson  <jas@extundo.com>
+
+	* time-stamp.el (time-stamp-hhmmss): New function.
+
 2002-09-06  Rendhalver [Peter Brown]  <rendhalver@xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 1.68 released.
   "Return the current time as a string in \"HH:MM:SS\" form."
   (substring (current-time-string) 11 19))
 
+(defun time-stamp-hhmmss ()
+  "Return the current time as a string in \"HHMMSS\" form."
+  (replace-in-string (substring (current-time-string) 11 19) ":" ""))
+
 (defun time-stamp-hhmm ()
   "Return the current time as a string in \"HHMM\" form."
   (let ((date (current-time-string)))