Commit 17f1172e authored by Kris Katterjohn's avatar Kris Katterjohn

Add zero-padding to the time printed out by DRIBBLE

Now the time will print like "02:03:08" instead of like "2:3:8"
parent 9e944557
......@@ -233,7 +233,7 @@ is not given, ends the recording."
*dribble-closure* nil))))
(multiple-value-bind (sec min hour day month year)
(get-decoded-time)
(format dribble-stream "~&Starts dribbling to ~A (~d/~d/~d, ~d:~d:~d)."
(format dribble-stream "~&Starts dribbling to ~A (~d/~d/~d, ~2,'0d:~2,'0d:~2,'0d)."
namestring year month day hour min sec)
(setq *standard-input* dribble-stream
*standard-output* dribble-stream
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment