; cperl-mode-tests.el: Don't run the newest test in perl-mode

* test/lisp/progmodes/cperl-mode-tests.el (cperl-test-bug-74245): Skip
if not in cperl-mode
This commit is contained in:
Harald Jörg 2025-01-14 12:17:47 +01:00
parent 6a864ef8f3
commit b981889e9e

View file

@ -1592,6 +1592,7 @@ and the slash, then we have a division."
(ert-deftest cperl-test-bug-74245 ()
"Verify that a bare \"$\" can appear at the end of a subroutine signature.
It must not be mistaken for \"$)\"."
(skip-unless (eq cperl-test-mode #'cperl-mode))
(cperl--run-test-cases
(ert-resource-file "cperl-bug-74245.pl")
(while (null (eobp))