diff options
| -rw-r--r-- | lisp/gnus/gmm-utils.el | 2 | ||||
| -rw-r--r-- | lisp/vc/pcvs-info.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gmm-utils.el b/lisp/gnus/gmm-utils.el index 6049f480461..fca2394cbc7 100644 --- a/lisp/gnus/gmm-utils.el +++ b/lisp/gnus/gmm-utils.el | |||
| @@ -473,7 +473,7 @@ specifiers `%Z' and `%z' will be replaced with a numeric form. " | |||
| 473 | (setq st nd)) | 473 | (setq st nd)) |
| 474 | (push (substring format-string st) rest) | 474 | (push (substring format-string st) rest) |
| 475 | (format-time-string (apply 'concat (nreverse rest)) time)) | 475 | (format-time-string (apply 'concat (nreverse rest)) time)) |
| 476 | (format-time-string format-string time tz))) | 476 | (format-time-string format-string time t))) |
| 477 | 477 | ||
| 478 | (provide 'gmm-utils) | 478 | (provide 'gmm-utils) |
| 479 | 479 | ||
diff --git a/lisp/vc/pcvs-info.el b/lisp/vc/pcvs-info.el index 1abc7729045..b9ecc892540 100644 --- a/lisp/vc/pcvs-info.el +++ b/lisp/vc/pcvs-info.el | |||
| @@ -465,7 +465,7 @@ DIR can also be a file." | |||
| 465 | ((equal date "Result of merge") (setq subtype 'MERGED)) | 465 | ((equal date "Result of merge") (setq subtype 'MERGED)) |
| 466 | ((let ((mtime (nth 5 (file-attributes (concat dir f)))) | 466 | ((let ((mtime (nth 5 (file-attributes (concat dir f)))) |
| 467 | (system-time-locale "C")) | 467 | (system-time-locale "C")) |
| 468 | (setq timestamp (format-time-string "%c" mtime 'utc)) | 468 | (setq timestamp (format-time-string "%c" mtime t)) |
| 469 | ;; Solaris sometimes uses "Wed Sep 05", not "Wed Sep 5". | 469 | ;; Solaris sometimes uses "Wed Sep 05", not "Wed Sep 5". |
| 470 | ;; See "grep '[^a-z_]ctime' cvs/src/*.c" for reference. | 470 | ;; See "grep '[^a-z_]ctime' cvs/src/*.c" for reference. |
| 471 | (if (= (aref timestamp 8) ?0) | 471 | (if (= (aref timestamp 8) ?0) |