diff options
| author | Paul Eggert | 1996-10-28 03:55:59 +0000 |
|---|---|---|
| committer | Paul Eggert | 1996-10-28 03:55:59 +0000 |
| commit | db853edc0bfa3113f0c45284f448e3f57da82591 (patch) | |
| tree | aa2794de75310d6376dc1f811e2f6ca64af33d48 | |
| parent | 914860c26260ac74a1c8920c383c24364bfed922 (diff) | |
| download | emacs-db853edc0bfa3113f0c45284f448e3f57da82591.tar.gz emacs-db853edc0bfa3113f0c45284f448e3f57da82591.zip | |
(timezone-time-from-absolute): Fix off-by-one
error in current-time-origin.
| -rw-r--r-- | lisp/timezone.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/timezone.el b/lisp/timezone.el index 8ab2c215bde..b4619488960 100644 --- a/lisp/timezone.el +++ b/lisp/timezone.el | |||
| @@ -277,7 +277,7 @@ Return a list suitable as an argument to current-time-zone, | |||
| 277 | or nil if the date cannot be thus represented. | 277 | or nil if the date cannot be thus represented. |
| 278 | DATE is the number of days elapsed since the (imaginary) | 278 | DATE is the number of days elapsed since the (imaginary) |
| 279 | Gregorian date Sunday, December 31, 1 BC." | 279 | Gregorian date Sunday, December 31, 1 BC." |
| 280 | (let* ((current-time-origin 719162) | 280 | (let* ((current-time-origin 719163) |
| 281 | ;; (timezone-absolute-from-gregorian 1 1 1970) | 281 | ;; (timezone-absolute-from-gregorian 1 1 1970) |
| 282 | (days (- date current-time-origin)) | 282 | (days (- date current-time-origin)) |
| 283 | (seconds-per-day (float 86400)) | 283 | (seconds-per-day (float 86400)) |