From: Paul Eggert <eggert@cs.ucla.edu>
Date: Thu, 15 Aug 2024 03:37:12 +0000 (-0700)
Subject: * lisp/calendar/time-date.el: Add comment.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5d64c5c4b6a4ab3521bd829621c515a9940b476a;p=emacs.git

* lisp/calendar/time-date.el: Add comment.

(cherry picked from commit 2533a60e4256336eb30786a555a8922326c49a8a)
---

diff --git a/lisp/calendar/time-date.el b/lisp/calendar/time-date.el
index eca80f1e8b6..b441974b943 100644
--- a/lisp/calendar/time-date.el
+++ b/lisp/calendar/time-date.el
@@ -154,6 +154,11 @@ it is assumed that PICO was omitted and should be treated as zero."
 DATE should be in one of the forms recognized by `parse-time-string'.
 If DATE lacks timezone information, GMT is assumed."
   (condition-case err
+      ;; Parse DATE. If it contains a year, use defaults for other components.
+      ;; Then encode the result; this signals an error if the year is missing,
+      ;; because encode-time signals if crucial time components are nil.
+      ;; This heuristic uses local time if the string lacks time zone info,
+      ;; because encode-time treats a nil time zone as local time.
       (let ((parsed (parse-time-string date)))
 	(when (decoded-time-year parsed)
 	  (decoded-time-set-defaults parsed))