]> git.eshelyaron.com Git - emacs.git/commitdiff
; Fix my last commit
authorStefan Kangas <stefankangas@gmail.com>
Mon, 23 Oct 2023 13:08:38 +0000 (15:08 +0200)
committerStefan Kangas <stefankangas@gmail.com>
Mon, 23 Oct 2023 13:10:37 +0000 (15:10 +0200)
* 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>.

test/lisp/erc/erc-tests.el

index 92e364503e2684f96881cefdcd8914a38c3a8c08..57bf5860ac4288cddb2f7e2ddd114838ef00d17b 100644 (file)
   (let* ((calls nil)
          (custom-modes nil)
          (on-load nil)
+         (text-quoting-style 'grave)
 
          (get-calls (lambda () (prog1 (nreverse calls) (setq calls nil))))
 
        (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")))))))