diff options
| author | Michael Albinus | 2024-12-22 10:20:15 +0100 |
|---|---|---|
| committer | Michael Albinus | 2024-12-22 10:20:15 +0100 |
| commit | fb7bf20a9c129a97ceeabad00523ecafaa58697c (patch) | |
| tree | b12f4497f9c43221db3a09b6d00054ba14574bf2 | |
| parent | 78eb102bc3d25aafb9a2d6756b956f7a2321a715 (diff) | |
| download | emacs-fb7bf20a9c129a97ceeabad00523ecafaa58697c.tar.gz emacs-fb7bf20a9c129a97ceeabad00523ecafaa58697c.zip | |
* test/lisp/files-tests.el (sh-shell): Move down declaration.
| -rw-r--r-- | test/lisp/files-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el index 78fc139025c..9dbf42ee603 100644 --- a/test/lisp/files-tests.el +++ b/test/lisp/files-tests.el | |||
| @@ -1659,8 +1659,6 @@ The door of all subtleties! | |||
| 1659 | (should (equal (file-name-base "foo") "foo")) | 1659 | (should (equal (file-name-base "foo") "foo")) |
| 1660 | (should (equal (file-name-base "foo/bar") "bar"))) | 1660 | (should (equal (file-name-base "foo/bar") "bar"))) |
| 1661 | 1661 | ||
| 1662 | (defvar sh-shell) | ||
| 1663 | |||
| 1664 | (defun files-tests--check-mode (filename) | 1662 | (defun files-tests--check-mode (filename) |
| 1665 | "Return the major mode found in `auto-mode-alist' for FILENAME." | 1663 | "Return the major mode found in `auto-mode-alist' for FILENAME." |
| 1666 | (set-auto-mode--find-matching-alist-entry | 1664 | (set-auto-mode--find-matching-alist-entry |
| @@ -1682,6 +1680,8 @@ The door of all subtleties! | |||
| 1682 | (should-not (eq (files-tests--check-mode "gdbinit.5") #'gdb-script-mode)) | 1680 | (should-not (eq (files-tests--check-mode "gdbinit.5") #'gdb-script-mode)) |
| 1683 | (should-not (eq (files-tests--check-mode ".gdbinit.py.in") #'gdb-script-mode))) | 1681 | (should-not (eq (files-tests--check-mode ".gdbinit.py.in") #'gdb-script-mode))) |
| 1684 | 1682 | ||
| 1683 | (defvar sh-shell) | ||
| 1684 | |||
| 1685 | (defun files-tests--check-shebang (shebang expected-mode &optional expected-dialect) | 1685 | (defun files-tests--check-shebang (shebang expected-mode &optional expected-dialect) |
| 1686 | "Assert that mode for SHEBANG derives from EXPECTED-MODE. | 1686 | "Assert that mode for SHEBANG derives from EXPECTED-MODE. |
| 1687 | 1687 | ||