From: Michael Albinus Date: Sun, 22 Dec 2024 09:20:15 +0000 (+0100) Subject: * test/lisp/files-tests.el (sh-shell): Move down declaration. X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=68f713aa7d441751a9b90facf4c115870ee54a5a;p=emacs.git * test/lisp/files-tests.el (sh-shell): Move down declaration. (cherry picked from commit fb7bf20a9c129a97ceeabad00523ecafaa58697c) --- 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! (should (equal (file-name-base "foo") "foo")) (should (equal (file-name-base "foo/bar") "bar"))) -(defvar sh-shell) - (defun files-tests--check-mode (filename) "Return the major mode found in `auto-mode-alist' for FILENAME." (set-auto-mode--find-matching-alist-entry @@ -1682,6 +1680,8 @@ The door of all subtleties! (should-not (eq (files-tests--check-mode "gdbinit.5") #'gdb-script-mode)) (should-not (eq (files-tests--check-mode ".gdbinit.py.in") #'gdb-script-mode))) +(defvar sh-shell) + (defun files-tests--check-shebang (shebang expected-mode &optional expected-dialect) "Assert that mode for SHEBANG derives from EXPECTED-MODE.