; Fix my last commit

* test/lisp/erc/erc-tests.el (erc-tests--update-modules): Bind
'text-quoting-style' to 'grave'.
(erc--update-modules/unknown): Simplify.
Suggested by Mattias Engdegård <mattias.engdegard@gmail.com>.
This commit is contained in:
Stefan Kangas 2023-10-23 15:08:38 +02:00
parent 9e002ef9c0
commit 0e30ee84ca

View file

@ -2574,6 +2574,7 @@
(let* ((calls nil)
(custom-modes nil)
(on-load nil)
(text-quoting-style 'grave)
(get-calls (lambda () (prog1 (nreverse calls) (setq calls nil))))
@ -2615,9 +2616,7 @@
(let* ((erc-modules '(foo))
(obarray (obarray-make))
(err (should-error (erc--update-modules erc-modules))))
(should (string-match (rx bos (any "`") "foo" (any "'")
" is not a known ERC module" eos)
(cadr err)))
(should (equal (cadr err) "`foo' is not a known ERC module"))
(should (equal (funcall get-calls)
`((req . ,(intern-soft "erc-foo")))))))