From 96c43d398a960361308cec536f3519ad5a74c61c Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Thu, 11 May 2023 19:48:18 -0700 Subject: [PATCH] Simplify soap-decode-data-time use of encode-time MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit * lisp/net/soap-client.el (soap-decode-date-time): Call encode-time directly instead of via ‘apply’. No need for the two nil args. --- lisp/net/soap-client.el | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) 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)))))) -- 2.39.5