1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

(calendar-absolute-from-time): Fix typo by interchanging (floor) and (%).

This commit is contained in:
Brian Fox 1993-09-21 06:51:15 +00:00
parent 4de97979a2
commit 1b41c5d14d

View file

@ -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.