# HG changeset patch
# User Edward M. Reingold <reingold@emr.cs.iit.edu>
# Date 803576171 0
# Node ID 7816b27690145e0bb2549094f898ed20abfea0a1
# Parent  d33ef5819d81d98a362b116f1e8d5b27026d0491
Fix bug in determination of output string.

diff -r d33ef5819d81 -r 7816b2769014 lisp/calendar/solar.el
--- 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