Don't just remove *one* padding zero if there are two

This commit is contained in:
Steve Purcell 2012-09-01 17:23:25 +01:00
parent 84f54dd5fe
commit 55139921af

View file

@ -72,7 +72,7 @@
(message (format "%s\n" (substring-no-properties str))) (message (format "%s\n" (substring-no-properties str)))
;; We remove zero-padding the HH portion, as it is lost ;; We remove zero-padding the HH portion, as it is lost
;; when stored in the archive-contents ;; when stored in the archive-contents
(replace-regexp-in-string "\\.0" (replace-regexp-in-string "\\.0+"
"." "."
(format-time-string (format-time-string
"%Y%m%d.%H%M" "%Y%m%d.%H%M"