* Better identify native compiler presence in two tests.

	* test/lisp/help-fns-tests.el (help-fns-test-lisp-defun)
	(help-fns-test-lisp-defsubst): Better identify native-comp
	presence.

diff --git a/test/lisp/help-fns-tests.el b/test/lisp/help-fns-tests.el
index 099d627f355e10d4177cb8fcb107a4b6917a68ec..8a226c4a0ba089b143e866e05334960362cec5da 100644 (file)
--- a/test/lisp/help-fns-tests.el
+++ b/test/lisp/help-fns-tests.el
@@ -62,14 +62,14 @@ Return first line of the output of (describe-function-1 FUNC)."
     (should (string-match regexp result))))
 
 (ert-deftest help-fns-test-lisp-defun ()
-  (let ((regexp (if (boundp 'comp-ctxt)
+  (let ((regexp (if (featurep 'nativecomp)
                     "a native compiled Lisp function in .+subr\\.el"
                   "a 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 (if (boundp 'comp-ctxt)
+  (let ((regexp (if (featurep 'nativecomp)
                     "a native compiled Lisp function in .+subr\\.el"
                   "a compiled Lisp function in .+subr\\.el"))
         (result (help-fns-tests--describe-function 'posn-window)))