From: Paul Eggert <eggert@cs.ucla.edu>
Date: Fri, 12 May 2023 02:48:18 +0000 (-0700)
Subject: Simplify soap-decode-data-time use of encode-time
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=96c43d398a960361308cec536f3519ad5a74c61c;p=emacs.git

Simplify soap-decode-data-time use of encode-time

* lisp/net/soap-client.el (soap-decode-date-time):
Call encode-time directly instead of via ‘apply’.
No need for the two nil args.
---

diff --git a/lisp/net/soap-client.el b/lisp/net/soap-client.el
index 866b33decc6..2991d29f870 100644
--- a/lisp/net/soap-client.el
+++ b/lisp/net/soap-client.el
@@ -717,12 +717,9 @@ representing leap seconds."
                 second)
               minute hour day month year second-fraction datatype time-zone)
       (let ((time
-             ;; Continue calling encode-time the old way, for backward
-             ;; compatibility in GNU ELPA.
-             (apply
-              #'encode-time (list
-                             (if new-decode-time new-decode-time-second second)
-                             minute hour day month year nil nil time-zone))))
+             ;; Call encode-time the old way, for Emacs<27.
+             (encode-time (if new-decode-time new-decode-time-second second)
+                          minute hour day month year time-zone)))
         (if new-decode-time
             (with-no-warnings (decode-time time nil t))
           (decode-time time))))))