# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1202980020 0
# Node ID f47b22aa9aac1e2f3f08c7fe5e7bfe7b559958a0
# Parent  55213355c0fa3d8203f03a51a604990887c9ed6b
(format-seconds): Let-bind `num'.

diff -r 55213355c0fa -r f47b22aa9aac lisp/calendar/time-date.el
--- a/lisp/calendar/time-date.el	Thu Feb 14 09:05:15 2008 +0000
+++ b/lisp/calendar/time-date.el	Thu Feb 14 09:07:00 2008 +0000
@@ -285,7 +285,7 @@
                  ("m" "minute"       60)
                  ("s" "second"        1)))
         (case-fold-search t)
-        spec match outunits unit prev name next)
+        spec match outunits unit prev name num next)
     (setq nonzero (not nonzero))
     (while (string-match "%\\.?[0-9]*\\(.\\)" string start)
       (setq start (match-end 0)