diff options
| author | Paul Eggert <eggert@twinsun.com> | 1994-05-30 17:42:43 +0000 |
|---|---|---|
| committer | Paul Eggert <eggert@twinsun.com> | 1994-05-30 17:42:43 +0000 |
| commit | b6c0aabf32f8fc295a629d341f5837ac88608485 (patch) | |
| tree | 6e6adaba859e3c63faf6f27bff69b25ce27690c8 /lisp/calendar/lunar.el | |
| parent | c230f36b7ba44a75313a95a5b6f7d070c3d2ebd1 (diff) | |
| download | emacs-b6c0aabf32f8fc295a629d341f5837ac88608485.tar.gz | |
(calendar-mod): Remove; it was equivalent to `mod'. All callers changed.
Diffstat (limited to 'lisp/calendar/lunar.el')
| -rw-r--r-- | lisp/calendar/lunar.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/lunar.el b/lisp/calendar/lunar.el index 8c3c07db986..0de568e55ed 100644 --- a/lisp/calendar/lunar.el +++ b/lisp/calendar/lunar.el @@ -83,7 +83,7 @@ Integer below INDEX/4 gives the lunation number, counting from Jan 1, 1900; remainder mod 4 gives the phase: 0 new moon, 1 first quarter, 2 full moon, 3 last quarter." - (let* ((phase (calendar-mod index 4)) + (let* ((phase (mod index 4)) (index (/ index 4.0)) (time (/ index 1236.85)) (date (+ (calendar-absolute-from-gregorian '(1 0.5 1900)) |