Mercurial > emacs

changeset 12312:7816b2769014

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix bug in determination of output string.
author Edward M. Reingold <reingold@emr.cs.iit.edu>
date Mon, 19 Jun 1995 15:36:11 +0000
parents d33ef5819d81
children eca218b0a8ca
files lisp/calendar/solar.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/solar.el	Mon Jun 19 13:36:45 1995 +0000
+++ b/lisp/calendar/solar.el	Mon Jun 19 15:36:11 1995 +0000
@@ -134,7 +134,7 @@
                   (/ (aref calendar-longitude 1) 60.0)))
              (if (numberp calendar-longitude)
                  (if (> calendar-longitude 0) "E" "W")
-               (if (equal (aref calendar-latitude 2) 'east) "E" "W"))))
+               (if (equal (aref calendar-longitude 2) 'east) "E" "W"))))
   "*Expression evaluating to name of `calendar-longitude', calendar-latitude'.
 For example, \"New York City\".  Default value is just the latitude, longitude
 pair.
@@ -491,7 +491,7 @@
                           (/ (aref calendar-longitude 1) 60.0)))
                      (if (numberp calendar-longitude)
                          (if (> calendar-longitude 0) "E" "W")
-                       (if (equal (aref calendar-latitude 2) 'east)
+                       (if (equal (aref calendar-longitude 2) 'east)
                            "E" "W"))))))
         (calendar-standard-time-zone-name
          (if (< arg 16) calendar-standard-time-zone-name