From 8a7cdf3af14e2334a3c46b12fbf911a1c341df2e Mon Sep 17 00:00:00 2001 From: "Edward M. Reingold" Date: Fri, 3 Jun 1994 20:27:02 +0000 Subject: [PATCH] (solar-holidays): Revised to use the rewritten and new fcns. --- lisp/calendar/calendar.el | 13 ++++--------- 1 file changed, 4 insertions(+), 9 deletions(-) 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.") -- 2.39.5