summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorBrian Fox <bfox@gnu.org>1993-09-21 06:51:15 +0000
committerBrian Fox <bfox@gnu.org>1993-09-21 06:51:15 +0000
commit1b41c5d14da0abd5eda3530411b3385e8263fc0b (patch)
treef5bad9750e8f82d67e9e20bd23f2133800d3fc75 /lisp
parent4de97979a2b078c62065b64c84876d23ee06a449 (diff)
downloademacs-1b41c5d14da0abd5eda3530411b3385e8263fc0b.tar.gz
(calendar-absolute-from-time): Fix typo by interchanging (floor) and (%).
Diffstat (limited to 'lisp')
-rw-r--r--lisp/calendar/cal-dst.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/cal-dst.el b/lisp/calendar/cal-dst.el
index 15ce7cd722a..d480914ded8 100644
--- a/lisp/calendar/cal-dst.el
+++ b/lisp/calendar/cal-dst.el
@@ -64,7 +64,7 @@ absolute date ABS-DATE is the equivalent moment to X."
;; floor((2^16 h +l) / (60*60*24))
(* 512 (floor h 675)) (floor u 675))
;; (2^16 h +l) % (60*60*24)
- (+ (* (mod u 675) 128) (mod l 128)))))
+ (+ (* (% u 675) 128) (% l 128)))))
(defun calendar-time-from-absolute (abs-date s)
"Time of absolute date ABS-DATE, S seconds after midnight.