From: Paul Eggert <eggert@cs.ucla.edu>
Date: Wed, 13 Feb 2019 08:23:23 +0000 (-0800)
Subject: Don’t assume CURRENT_TIME_LIST
X-Git-Tag: emacs-27.0.90~3623
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8e0d35802cda844ccb6ddf417672b5a5845f4874;p=emacs.git

Don’t assume CURRENT_TIME_LIST

* lisp/url/url-util.el (url-lazy-message):
Don’t assume (current-time) returns a list.
Fix unlikely bug if we’re called 65536 seconds apart.
---

diff --git a/lisp/url/url-util.el b/lisp/url/url-util.el
index 1ca257210aa..c2baa69d5a9 100644
--- a/lisp/url/url-util.el
+++ b/lisp/url/url-util.el
@@ -182,7 +182,7 @@ Will not do anything if `url-show-status' is nil."
 	  (null url-show-status)
 	  (active-minibuffer-window)
 	  (= url-lazy-message-time
-	     (setq url-lazy-message-time (nth 1 (current-time)))))
+	     (setq url-lazy-message-time (encode-time nil 'integer))))
       nil
     (apply 'message args)))