emacs-diffs
[Top][All Lists]
Advanced

[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))))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]