aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorF. Jason Park2022-06-30 22:43:41 -0700
committerF. Jason Park2022-06-30 22:49:33 -0700
commitefc2a878de6368eebb1ba73f5131eec563ca9b56 (patch)
treeef75d2b234e362dac52148acb139d599d52bf9be /test
parentef3f8a25655e2a44a46f9c86c300a0b9cb120567 (diff)
downloademacs-efc2a878de6368eebb1ba73f5131eec563ca9b56.tar.gz
emacs-efc2a878de6368eebb1ba73f5131eec563ca9b56.zip
; Tag ERC channel-buffers test as unstable
* test/lisp/erc/erc-networks-tests.el (erc-networks--id, erc-networks--id-create): Attempt to fix arity of mocked `float-time'. * test/lisp/erc/erc-scenarios-base-reuse-buffers.el (erc-scenarios-base-reuse-buffers-channel-buffers--disabled): Tag as being unstable.
Diffstat (limited to 'test')
-rw-r--r--test/lisp/erc/erc-networks-tests.el4
-rw-r--r--test/lisp/erc/erc-scenarios-base-reuse-buffers.el2
2 files changed, 3 insertions, 3 deletions
diff --git a/test/lisp/erc/erc-networks-tests.el b/test/lisp/erc/erc-networks-tests.el
index dcda04692ec..417ee94cf0c 100644
--- a/test/lisp/erc/erc-networks-tests.el
+++ b/test/lisp/erc/erc-networks-tests.el
@@ -48,7 +48,7 @@
48 48
49(ert-deftest erc-networks--id () 49(ert-deftest erc-networks--id ()
50 (cl-letf (((symbol-function 'float-time) 50 (cl-letf (((symbol-function 'float-time)
51 (lambda () 0.0))) 51 (lambda (&optional _) 0.0)))
52 52
53 ;; Fixed 53 ;; Fixed
54 (should (equal (erc-networks--id-fixed-create 'foo) 54 (should (equal (erc-networks--id-fixed-create 'foo)
@@ -81,7 +81,7 @@
81 81
82(ert-deftest erc-networks--id-create () 82(ert-deftest erc-networks--id-create ()
83 (cl-letf (((symbol-function 'float-time) 83 (cl-letf (((symbol-function 'float-time)
84 (lambda () 0.0))) 84 (lambda (&optional _) 0.0)))
85 85
86 (should (equal (erc-networks--id-create 'foo) 86 (should (equal (erc-networks--id-create 'foo)
87 (make-erc-networks--id-fixed :ts (float-time) 87 (make-erc-networks--id-fixed :ts (float-time)
diff --git a/test/lisp/erc/erc-scenarios-base-reuse-buffers.el b/test/lisp/erc/erc-scenarios-base-reuse-buffers.el
index 5af9589b745..f134f3ffb69 100644
--- a/test/lisp/erc/erc-scenarios-base-reuse-buffers.el
+++ b/test/lisp/erc/erc-scenarios-base-reuse-buffers.el
@@ -226,7 +226,7 @@ Adapted from scenario clash-of-chans/uniquify described in Bug#48598:
226 (should chan-buffer-foo)))) 226 (should chan-buffer-foo))))
227 227
228(ert-deftest erc-scenarios-base-reuse-buffers-channel-buffers--disabled () 228(ert-deftest erc-scenarios-base-reuse-buffers-channel-buffers--disabled ()
229 :tags '(:expensive-test) 229 :tags '(:expensive-test :unstable)
230 (with-suppressed-warnings ((obsolete erc-reuse-buffers)) 230 (with-suppressed-warnings ((obsolete erc-reuse-buffers))
231 (should erc-reuse-buffers) 231 (should erc-reuse-buffers)
232 (let ((erc-scenarios-common-dialog "base/reuse-buffers/channel") 232 (let ((erc-scenarios-common-dialog "base/reuse-buffers/channel")