diff options
| author | Kai Großjohann <kgrossjo@eu.uu.net> | 2000-10-29 17:56:57 +0000 |
|---|---|---|
| committer | Kai Großjohann <kgrossjo@eu.uu.net> | 2000-10-29 17:56:57 +0000 |
| commit | d09b9dbd231631be857b088097700776a9569005 (patch) | |
| tree | 449ae41c3a1bddab4885c3bb349a67279ed67532 /lisp/time-stamp.el | |
| parent | 1da437e9a86ce6a7db0f3a58f17289842ae92ff7 (diff) | |
| download | emacs-d09b9dbd231631be857b088097700776a9569005.tar.gz | |
bogus commit
Diffstat (limited to 'lisp/time-stamp.el')
| -rw-r--r-- | lisp/time-stamp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/time-stamp.el b/lisp/time-stamp.el index 62fe6f11c24..b34ddfe0b60 100644 --- a/lisp/time-stamp.el +++ b/lisp/time-stamp.el @@ -544,9 +544,9 @@ Optionally use FORMAT." ((eq cur-char ?y) ;year (or alt-form (not (string-equal field-width "")) (time-stamp-conv-warn "%y" "%:y")) - (format-time-string "%Y" time)) + (string-to-int (format-time-string "%Y" time))) ((eq cur-char ?Y) ;4-digit year, new style - (format-time-string "%Y" time)) + (string-to-int (format-time-string "%Y" time))) ((eq cur-char ?z) ;time zone lower case (if change-case "" ;discourage %z variations |