summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2015-05-11 23:46:40 -0700
committerGlenn Morris <rgm@gnu.org>2015-05-11 23:46:40 -0700
commit3903564ed39bd853bc3aaf61457594dfa285f743 (patch)
treeb6b9c0667b38eadd46c900afd30903fac9dd5dc0 /lisp
parentd1b74200dad00cea845037064dc8b5d50db35dd2 (diff)
downloademacs-3903564ed39bd853bc3aaf61457594dfa285f743.tar.gz
* lisp/play/dunnet.el (dun-dos-boot-msg): Fix time. (Bug#20554)
Diffstat (limited to 'lisp')
-rw-r--r--lisp/play/dunnet.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/play/dunnet.el b/lisp/play/dunnet.el
index 2f4536c0820..877e5dbea88 100644
--- a/lisp/play/dunnet.el
+++ b/lisp/play/dunnet.el
@@ -3099,7 +3099,7 @@ File not found")))
(defun dun-dos-boot-msg ()
(sleep-for 3)
(dun-mprinc "Current time is ")
- (dun-mprincl (substring (current-time-string) 12 20))
+ (dun-mprincl (format-time-string "%H:%M:%S"))
(dun-mprinc "Enter new time: ")
(dun-read-line)
(if (not dun-batch-mode)