diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/emacs-lisp/shadow-tests.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/shadow-tests.el b/test/lisp/emacs-lisp/shadow-tests.el index 9d4969fe8bb..f0aa1310bc4 100644 --- a/test/lisp/emacs-lisp/shadow-tests.el +++ b/test/lisp/emacs-lisp/shadow-tests.el | |||
| @@ -33,7 +33,7 @@ | |||
| 33 | 33 | ||
| 34 | (ert-deftest shadow-case-insensitive () | 34 | (ert-deftest shadow-case-insensitive () |
| 35 | "Test shadowing for case insensitive filenames." | 35 | "Test shadowing for case insensitive filenames." |
| 36 | ;; Override `file-name-case-insentive-p' so we test the same thing | 36 | ;; Override `file-name-case-insensitive-p' so we test the same thing |
| 37 | ;; regardless of what file system we're running on. | 37 | ;; regardless of what file system we're running on. |
| 38 | (cl-letf (((symbol-function 'file-name-case-insensitive-p) (lambda (_f) t))) | 38 | (cl-letf (((symbol-function 'file-name-case-insensitive-p) (lambda (_f) t))) |
| 39 | (should (equal (list (expand-file-name "p1/foo" shadow-tests-data-directory) | 39 | (should (equal (list (expand-file-name "p1/foo" shadow-tests-data-directory) |