From: F. Jason Park <jp@neverwas.me>
Date: Wed, 13 Sep 2023 23:04:43 +0000 (-0700)
Subject: ; * test/lisp/erc/erc-stamp-tests.el (erc-echo-timestamp): Tag unstable.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d8c0bfb2655631a83867629f1bfc6ec8c5b55f10;p=emacs.git

; * test/lisp/erc/erc-stamp-tests.el (erc-echo-timestamp): Tag unstable.
---

diff --git a/test/lisp/erc/erc-stamp-tests.el b/test/lisp/erc/erc-stamp-tests.el
index b00aa6dcabf..46a05729066 100644
--- a/test/lisp/erc/erc-stamp-tests.el
+++ b/test/lisp/erc/erc-stamp-tests.el
@@ -275,6 +275,8 @@
         (kill-buffer)))))
 
 (ert-deftest erc-echo-timestamp ()
+  :tags (and (null (getenv "CI")) '(:unstable))
+
   (should-not erc-echo-timestamps)
   (should-not erc-stamp--last-stamp)
   (insert (propertize "abc" 'erc-timestamp 433483200))
@@ -298,8 +300,9 @@
                    "1983-09-27 00:00:00 EDT"))
     ;; Interactive with zone
     (let ((current-prefix-arg '(4)))
-      (should (equal (call-interactively #'erc-echo-timestamp)
-                     "1983-09-27 04:00:00 GMT")))
+      (should (member (call-interactively #'erc-echo-timestamp)
+                      '("1983-09-27 04:00:00 GMT"
+                        "1983-09-27 04:00:00 UTC"))))
     (let ((current-prefix-arg -7))
       (should (equal (call-interactively #'erc-echo-timestamp)
                      "1983-09-26 21:00:00 -07")))))