[Emacs-diffs] Changes to emacs/lisp/calendar/solar.el

[Richard M. Stallman]

Index: emacs/lisp/calendar/solar.el
diff -u emacs/lisp/calendar/solar.el:1.39 emacs/lisp/calendar/solar.el:1.40
--- emacs/lisp/calendar/solar.el:1.39   Mon Jul 16 03:46:48 2001
+++ emacs/lisp/calendar/solar.el        Sun Nov 11 15:14:47 2001
@@ -316,8 +316,8 @@
     (if (not (and rise-time set-time))
         (if (or (and (> latitude 0) solar-spring-or-summer-season)
                 (and (< latitude 0) (not solar-spring-or-summer-season)))
-          (setq day-length 24)
-          (setq day-length 0))
+           (setq day-length 0)
+          (setq day-length 24))
         (setq day-length (- set-time rise-time)))
     (list (if rise-time (+ rise-time (/ calendar-time-zone 60.0)) nil)
           (if set-time (+ set-time (/ calendar-time-zone 60.0)) nil)