[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 0e30ee84ca4: ; Fix my last commit
From: |
Stefan Kangas |
Subject: |
master 0e30ee84ca4: ; Fix my last commit |
Date: |
Mon, 23 Oct 2023 09:10:55 -0400 (EDT) |
branch: master
commit 0e30ee84ca4f43f890705a0a5e0afaced7624f9a
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>
; 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>.
---
test/lisp/erc/erc-tests.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/test/lisp/erc/erc-tests.el b/test/lisp/erc/erc-tests.el
index 92e364503e2..57bf5860ac4 100644
--- a/test/lisp/erc/erc-tests.el
+++ b/test/lisp/erc/erc-tests.el
@@ -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")))))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 0e30ee84ca4: ; Fix my last commit,
Stefan Kangas <=