Prefer encode-time to its alias

* lisp/calendar/icalendar.el, lisp/calendar/timeclock.el:
* lisp/emacs-lisp/timer.el, lisp/gnus/gnus-delay.el:
* lisp/gnus/gnus-sum.el, lisp/gnus/nndiary.el:
* lisp/gnus/nnrss.el, lisp/net/newst-backend.el:
* lisp/net/rcirc.el, lisp/obsolete/xesam.el:
* lisp/org/org-agenda.el, lisp/org/org-clock.el:
* lisp/org/org-element.el, lisp/org/org-timer.el:
* lisp/org/org.el, lisp/progmodes/flymake.el:
* lisp/url/url-cache.el, lisp/url/url-cookie.el:
Use encode-time instead of its alias seconds-to-time.

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)))