Mercurial > emacs
changeset 39371:76ff4ba003e8
(time-stamp-string-preprocess): Fix bug that
caused %#a and %#b to be mis-formatted.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 21 Sep 2001 09:08:40 +0000 |
| parents | ad583999e1b4 |
| children | 7e0cf1456a22 |
| files | lisp/time-stamp.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/time-stamp.el Fri Sep 21 07:45:37 2001 +0000 +++ b/lisp/time-stamp.el Fri Sep 21 09:08:40 2001 +0000 @@ -5,7 +5,7 @@ ;; This file is part of GNU Emacs. -;; Maintainer's Time-stamp: <2001-07-15 12:35:58 pavel> +;; Maintainer's Time-stamp: <2001-09-20 11:57:46 gildea> ;; Maintainer: Stephen Gildea <gildea@stop.mail-abuse.org> ;; Keywords: tools @@ -503,7 +503,7 @@ "%%") ((eq cur-char ?a) ;day of week (if change-case - (format-time-string "%#A" time) + (format-time-string "%#a" time) (or alt-form (not (string-equal field-width "")) (time-stamp-conv-warn "%a" "%:a")) (if (and alt-form (not (string-equal field-width ""))) @@ -517,7 +517,7 @@ (format-time-string "%#A" time))) ((eq cur-char ?b) ;month name (if change-case - (format-time-string "%#B" time) + (format-time-string "%#b" time) (or alt-form (not (string-equal field-width "")) (time-stamp-conv-warn "%b" "%:b")) (if (and alt-form (not (string-equal field-width "")))