Mercurial > emacs
comparison lisp/time-stamp.el @ 33032:ccf845685d1c
install-info syntax compat change.
| author | Kai Großjohann <kgrossjo@eu.uu.net> |
|---|---|
| date | Sun, 29 Oct 2000 17:36:49 +0000 |
| parents | 12f068b4d5ac |
| children | b440b63b45d0 |
comparison
equal
deleted
inserted
replaced
| 33031:bc097a5477d1 | 33032:ccf845685d1c |
|---|---|
| 542 ((eq cur-char ?w) ;weekday number, Sunday is 0 | 542 ((eq cur-char ?w) ;weekday number, Sunday is 0 |
| 543 (format-time-string "%w" time)) | 543 (format-time-string "%w" time)) |
| 544 ((eq cur-char ?y) ;year | 544 ((eq cur-char ?y) ;year |
| 545 (or alt-form (not (string-equal field-width "")) | 545 (or alt-form (not (string-equal field-width "")) |
| 546 (time-stamp-conv-warn "%y" "%:y")) | 546 (time-stamp-conv-warn "%y" "%:y")) |
| 547 (string-to-int (format-time-string "%Y" time))) | 547 (format-time-string "%Y" time)) |
| 548 ((eq cur-char ?Y) ;4-digit year, new style | 548 ((eq cur-char ?Y) ;4-digit year, new style |
| 549 (string-to-int (format-time-string "%Y" time))) | 549 (format-time-string "%Y" time)) |
| 550 ((eq cur-char ?z) ;time zone lower case | 550 ((eq cur-char ?z) ;time zone lower case |
| 551 (if change-case | 551 (if change-case |
| 552 "" ;discourage %z variations | 552 "" ;discourage %z variations |
| 553 (format-time-string "%#Z" time))) | 553 (format-time-string "%#Z" time))) |
| 554 ((eq cur-char ?Z) | 554 ((eq cur-char ?Z) |