From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 9 Jul 2019 22:04:55 +0000 (+0200)
Subject: Fix timezone east of GMT in Calv
X-Git-Tag: emacs-27.0.90~2029
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=101dad2c150e7416c35f9ccf34dfbc6e3a6ccd32;p=emacs.git

Fix timezone east of GMT in Calv

* lisp/calc/calc-forms.el (math-calendar-tzinfo): Make timezone
calculation work east of Greenwich.  Fix proposed by David O'Shea
(bug#34075).
---

diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el
index fce82d2eaac..8faeb0a9dec 100644
--- a/lisp/calc/calc-forms.el
+++ b/lisp/calc/calc-forms.el
@@ -1491,7 +1491,7 @@ second, the number of seconds offset for daylight savings."
                     (calendar-current-time-zone)
                     calendar-current-time-zone-cache)))
       (setq math-calendar-tzinfo
-            (list (* 60 (abs (nth 0 tzinfo)))
+            (list (* 60 (- (nth 0 tzinfo)))
                   (* 60 (nth 1 tzinfo)))))))
 
 (defun calcFunc-tzone (&optional zone date)