[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-28 ae1ace1cf4: Adjust help-fns.el tests for recent change
From: |
Stefan Kangas |
Subject: |
emacs-28 ae1ace1cf4: Adjust help-fns.el tests for recent change |
Date: |
Fri, 22 Jul 2022 18:07:23 -0400 (EDT) |
branch: emacs-28
commit ae1ace1cf4a8b0624f72a8f76e702d78b643ea32
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
Adjust help-fns.el tests for recent change
* test/lisp/help-fns-tests.el (help-fns-test-lisp-defun)
(help-fns-test-lisp-defsubst): Adjust tests for recent change.
---
test/lisp/help-fns-tests.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/test/lisp/help-fns-tests.el b/test/lisp/help-fns-tests.el
index 4002501dde..3132a59023 100644
--- a/test/lisp/help-fns-tests.el
+++ b/test/lisp/help-fns-tests.el
@@ -63,13 +63,13 @@ Return first line of the output of (describe-function-1
FUNC)."
(ert-deftest help-fns-test-lisp-defun ()
(let ((regexp (if (featurep 'native-compile)
- "a native compiled Lisp function in .+subr\\.el"
- "a compiled Lisp function in .+subr\\.el"))
+ "a native-compiled Lisp function in .+subr\\.el"
+ "a byte-compiled Lisp function in .+subr\\.el"))
(result (help-fns-tests--describe-function 'last)))
(should (string-match regexp result))))
(ert-deftest help-fns-test-lisp-defsubst ()
- (let ((regexp "a compiled Lisp function in .+subr\\.el")
+ (let ((regexp "a byte-compiled Lisp function in .+subr\\.el")
(result (help-fns-tests--describe-function 'posn-window)))
(should (string-match regexp result))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-28 ae1ace1cf4: Adjust help-fns.el tests for recent change,
Stefan Kangas <=