mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-07 16:10:46 -08:00
Code Issues Projects Releases Wiki Activity

Fix last change

Browse source 
* test/lisp/textmodes/ispell-tests/ispell-aspell-tests.el:
* test/lisp/textmodes/ispell-tests/ispell-hunspell-tests.el:
* test/lisp/textmodes/ispell-tests/ispell-international-ispell-tests.el:
* test/lisp/textmodes/ispell-tests/ispell-tests.el: Fix load argument.
This commit is contained in:
Michael Albinus 2025-09-12 16:18:26 +02:00
parent 4846ec4871
commit 1b4e4fda5e
4 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
test/lisp/textmodes/ispell-tests/ispell-aspell-tests.el
View file

@ -32,9 +32,9 @@
(add-to-list 'load-path (when (not (null load-file-name))
(directory-file-name
(file-name-directory load-file-name))))
(load "ispell-tests-common.el"))
(load "ispell-tests-common"))
(declare-function letopt (expand-file-name "test/lisp/textmodes/ispell-tests/ispell-tests-common.el" source-directory) t t)
(declare-function letopt (expand-file-name "ispell-tests-common" source-directory) t t)
(ert-deftest ispell/aspell/ispell-check-version/works ()
"Test that aspell is correctly detected."

2
test/lisp/textmodes/ispell-tests/ispell-hunspell-tests.el
View file

@ -32,7 +32,7 @@
(add-to-list 'load-path (when (not (null load-file-name))
(directory-file-name
(file-name-directory load-file-name))))
(load "ispell-tests-common.el"))
(load "ispell-tests-common"))
(ert-deftest ispell/hunspell/ispell-word/english/check-only ()
"This test checks that Russian spellchecking works for Hunspell."

2
test/lisp/textmodes/ispell-tests/ispell-international-ispell-tests.el
View file

@ -29,7 +29,7 @@
(add-to-list 'load-path (and load-file-name
(directory-file-name
(file-name-directory load-file-name))))
(load "ispell-tests-common.el"))
(load "ispell-tests-common"))
(ert-deftest ispell/international-ispell/ispell-word/russian/check-only ()
"This test checks that Russian spellchecking works for.

2
test/lisp/textmodes/ispell-tests/ispell-tests.el
View file

@ -30,7 +30,7 @@
(add-to-list 'load-path (when (not (null load-file-name))
(directory-file-name
(file-name-directory load-file-name))))
(load "ispell-tests-common.el"))
(load "ispell-tests-common"))
(declare-function letopt "ispell-tests-common")
(declare-function ispell-tests--some-backend "ispell-tests-common" t t)