2 files changed, 4 insertions, 4 deletions

diff --git a/lisp/url/url-cache.el b/lisp/url/url-cache.el
index 66a7223bc89..a1cb0b9274e 100644
--- a/lisp/url/url-cache.el
+++ b/lisp/url/url-cache.el
@@ -205,7 +205,7 @@ If `url-standalone-mode' is non-nil, cached items never expire."
           (time-less-p
            (time-add
             cache-time
-            (seconds-to-time (or expire-time url-cache-expire-time)))
+            (encode-time (or expire-time url-cache-expire-time)))
            nil)))))
 
 (defun url-cache-prune-cache (&optional directory)
@@ -227,7 +227,7 @@ considered \"expired\"."
            ((time-less-p
              (time-add
               (file-attribute-modification-time (file-attributes file))
-              (seconds-to-time url-cache-expire-time))
+              (encode-time url-cache-expire-time))
              now)
             (delete-file file)
             (setq deleted-files (1+ deleted-files))))))
diff --git a/lisp/url/url-cookie.el b/lisp/url/url-cookie.el
index 0c276388185..213dab268c9 100644
--- a/lisp/url/url-cookie.el
+++ b/lisp/url/url-cookie.el
@@ -105,10 +105,10 @@ i.e. 1970-1-1) are loaded as expiring one year from now instead."
                     ;; away, make it expire a year from now
                     (expires (format-time-string
                               "%d %b %Y %T [GMT]"
-                              (seconds-to-time
+                              (encode-time
                                (let ((s (string-to-number (nth 4 fields))))
                                  (if (and (= s 0) long-session)
-                                     (seconds-to-time (+ (* 365 24 60 60) (float-time)))
+                                     (encode-time (+ (* 365 24 60 60) (float-time)))
                                    s)))))
                     (key (nth 5 fields))
                     (val (nth 6 fields)))