summaryrefslogtreecommitdiff
path: root/test/lisp/erc/erc-scenarios-base-reuse-buffers.el
diff options
context:
space:
mode:
authorF. Jason Park <jp@neverwas.me>2023-02-14 07:47:06 -0800
committerF. Jason Park <jp@neverwas.me>2023-02-14 08:25:00 -0800
commit4f099a721730b3c5e75133f75d34ff8b379522a1 (patch)
tree831bcf6ac9b58deee074a3a359d5a492fef9cff9 /test/lisp/erc/erc-scenarios-base-reuse-buffers.el
parent4bb27a5ca93f8269d9cd4b85fd948176304236eb (diff)
downloademacs-4f099a721730b3c5e75133f75d34ff8b379522a1.tar.gz
emacs-4f099a721730b3c5e75133f75d34ff8b379522a1.tar.bz2
emacs-4f099a721730b3c5e75133f75d34ff8b379522a1.zip
; Remove failing erc-reuse-buffers test
* test/lisp/erc/erc-scenarios-base-reuse-buffers.el (erc-scenarios-base-reuse-buffers-server-buffers--enabled): Delete test.
Diffstat (limited to 'test/lisp/erc/erc-scenarios-base-reuse-buffers.el')
-rw-r--r--test/lisp/erc/erc-scenarios-base-reuse-buffers.el36
1 files changed, 0 insertions, 36 deletions
diff --git a/test/lisp/erc/erc-scenarios-base-reuse-buffers.el b/test/lisp/erc/erc-scenarios-base-reuse-buffers.el
index d23a0b35904..71027a0c138 100644
--- a/test/lisp/erc/erc-scenarios-base-reuse-buffers.el
+++ b/test/lisp/erc/erc-scenarios-base-reuse-buffers.el
@@ -63,42 +63,6 @@ collisions involving bouncers in ERC. Run EXTRA."
(should (cdr (erc-scenarios-common-buflist "127.0.0.1"))))
(when more (funcall more port))))
-;; XXX maybe remove: already covered many times over by other scenarios
-(ert-deftest erc-scenarios-base-reuse-buffers-server-buffers--enabled ()
- :tags '(:expensive-test)
- (with-suppressed-warnings ((obsolete erc-reuse-buffers))
- (should erc-reuse-buffers))
- (let ((erc-scenarios-common-dialog "base/reuse-buffers/server"))
- (erc-scenarios-common-with-cleanup
- ((dumb-server (erc-d-run "localhost" t 'foonet 'barnet))
- (port (process-contact dumb-server :service))
- erc-autojoin-channels-alist)
-
- (ert-info ("Connect to foonet")
- (with-current-buffer (erc :server "127.0.0.1"
- :port port
- :nick "tester"
- :password "foonet:changeme"
- :full-name "tester")
- (should (string= (buffer-name) (format "127.0.0.1:%d" port)))
- (erc-d-t-search-for 12 "marked as being away")))
-
- (ert-info ("Connect to barnet")
- (with-current-buffer (erc :server "127.0.0.1"
- :port port
- :nick "tester"
- :password "barnet:changeme"
- :full-name "tester")
- (should (string= (buffer-name) (format "127.0.0.1:%d" port)))
- (erc-d-t-search-for 45 "marked as being away")))
-
- (erc-d-t-wait-for 2 (get-buffer "foonet"))
- (erc-d-t-wait-for 2 (get-buffer "barnet"))
-
- (ert-info ("Server buffers are unique, no IP-based names")
- (should-not (eq (get-buffer "foonet") (get-buffer "barnet")))
- (should-not (erc-scenarios-common-buflist "127.0.0.1"))))))
-
;; FIXME no sense in running this twice (JOIN variant includes this)
(ert-deftest erc-scenarios-base-reuse-buffers-server-buffers--disabled ()
:tags '(:expensive-test)