Default DST to "undecided" in decoded-time-set-defaults

* lisp/calendar/time-date.el (decoded-time-set-defaults): When we
don't have a zone or a DST, set DST to "undecided".

diff --git a/lisp/calendar/time-date.el b/lisp/calendar/time-date.el
index 6f85171247228b562c094c49e9e3cec3556213ca..dfe8dce68b16ac5995e581e7e3abf8437559d689 100644 (file)
--- a/lisp/calendar/time-date.el
+++ b/lisp/calendar/time-date.el
@@ -530,6 +530,12 @@ TIME is modified and returned."
     (setf (decoded-time-month time) 1))
   (unless (decoded-time-year time)
     (setf (decoded-time-year time) 0))
+
+  ;; When we don't have a time zone and we don't have a DST, then mark
+  ;; it as unknown.
+  (when (and (not (decoded-time-zone time))
+             (not (decoded-time-dst time)))
+    (setf (decoded-time-dst time) -1))
   time)
 
 (provide 'time-date)