From: Edward M. Reingold <reingold@emr.cs.iit.edu>
Date: Fri, 3 Jun 1994 20:27:02 +0000 (+0000)
Subject: (solar-holidays): Revised to use the rewritten and new fcns.
X-Git-Tag: emacs-19.34~8074
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8a7cdf3af14e2334a3c46b12fbf911a1c341df2e;p=emacs.git

(solar-holidays): Revised to use the rewritten and new fcns.
---

diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index df525a47abc..e1355cd5442 100644
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -807,10 +807,8 @@ See the documentation for `calendar-holidays' for details.")
         '(format "Daylight Savings Time Begins %s"
                   (if (fboundp 'atan)
                       (solar-time-string
-                       (/ calendar-daylight-savings-starts-time
-                          (float 60))
-                       date
-                       'standard)
+                       (/ calendar-daylight-savings-starts-time (float 60))
+                       calendar-standard-time-zone-name)
                     ""))))
     (funcall
      'holiday-sexp
@@ -818,11 +816,8 @@ See the documentation for `calendar-holidays' for details.")
      '(format "Daylight Savings Time Ends %s"
               (if (fboundp 'atan)
                   (solar-time-string
-                   (/ (- calendar-daylight-savings-ends-time
-                         calendar-daylight-time-offset)
-                      (float 60))
-                   date
-                   'daylight)
+                   (/ calendar-daylight-savings-ends-time (float 60))
+                   calendar-daylight-time-zone-name)
                 ""))))
   "*Sun-related holidays.
 See the documentation for `calendar-holidays' for details.")