; 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.
This commit is contained in:
F. Jason Park 2022-06-30 22:43:41 -07:00
parent ef3f8a2565
commit efc2a878de
2 changed files with 3 additions and 3 deletions

View file

@ -48,7 +48,7 @@
(ert-deftest erc-networks--id ()
(cl-letf (((symbol-function 'float-time)
(lambda () 0.0)))
(lambda (&optional _) 0.0)))
;; Fixed
(should (equal (erc-networks--id-fixed-create 'foo)
@ -81,7 +81,7 @@
(ert-deftest erc-networks--id-create ()
(cl-letf (((symbol-function 'float-time)
(lambda () 0.0)))
(lambda (&optional _) 0.0)))
(should (equal (erc-networks--id-create 'foo)
(make-erc-networks--id-fixed :ts (float-time)

View file

@ -226,7 +226,7 @@ Adapted from scenario clash-of-chans/uniquify described in Bug#48598:
(should chan-buffer-foo))))
(ert-deftest erc-scenarios-base-reuse-buffers-channel-buffers--disabled ()
:tags '(:expensive-test)
:tags '(:expensive-test :unstable)
(with-suppressed-warnings ((obsolete erc-reuse-buffers))
(should erc-reuse-buffers)
(let ((erc-scenarios-common-dialog "base/reuse-buffers/channel")