emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/compat 7e697a35f8 4/8: Fix tests


From: ELPA Syncer
Subject: [elpa] externals/compat 7e697a35f8 4/8: Fix tests
Date: Wed, 4 Jan 2023 14:57:26 -0500 (EST)

branch: externals/compat
commit 7e697a35f8ff8d8fe4ab94b87f6b16069e0374ce
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Fix tests
---
 compat-tests.el | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/compat-tests.el b/compat-tests.el
index b2c371138d..77833e5d57 100644
--- a/compat-tests.el
+++ b/compat-tests.el
@@ -1688,15 +1688,15 @@
 
 (ert-deftest decoded-time-getters ()
   (let ((time '(second minute hour day month year weekday dst zone)))
-    (should-equal (decode-time-second time) 'second)
-    (should-equal (decode-time-minute time) 'minute)
-    (should-equal (decode-time-hour time) 'hour)
-    (should-equal (decode-time-day time) 'day)
-    (should-equal (decode-time-month time) 'month)
-    (should-equal (decode-time-year time) 'year)
-    (should-equal (decode-time-weekday time) 'weekday)
-    (should-equal (decode-time-dst time) 'dst)
-    (should-equal (decode-time-zone time) 'zone)))
+    (should-equal (decoded-time-second time) 'second)
+    (should-equal (decoded-time-minute time) 'minute)
+    (should-equal (decoded-time-hour time) 'hour)
+    (should-equal (decoded-time-day time) 'day)
+    (should-equal (decoded-time-month time) 'month)
+    (should-equal (decoded-time-year time) 'year)
+    (should-equal (decoded-time-weekday time) 'weekday)
+    (should-equal (decoded-time-dst time) 'dst)
+    (should-equal (decoded-time-zone time) 'zone)))
 
 (ert-deftest decoded-time-period ()
   (should-equal 0 (decoded-time-period '()))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]