summaryrefslogtreecommitdiff
path: root/test/lisp/files-tests.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-04-19 18:06:31 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-04-19 18:06:31 +0200
commite45abc832db7d1a64a0761dcb51565b7c282999a (patch)
tree9672c3aa7c659336e5d91118168a5bc8c5f0bab1 /test/lisp/files-tests.el
parent35592141cc8951c91a4bd6cc02f73d1ddd35aca4 (diff)
downloademacs-e45abc832db7d1a64a0761dcb51565b7c282999a.tar.gz
Fix regression with multiple mode: entries in the prop line
* lisp/files.el (hack-local-variables--find-variables): Use the final mode: line (which is the same as having several mode: bits in the header line.
Diffstat (limited to 'test/lisp/files-tests.el')
-rw-r--r--test/lisp/files-tests.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el
index c886bd79851..c5b0fe0bbbc 100644
--- a/test/lisp/files-tests.el
+++ b/test/lisp/files-tests.el
@@ -1825,5 +1825,9 @@ Prompt users for any modified buffer with `buffer-offer-save' non-nil."
(find-file (ert-resource-file "file-mode-multiple"))
(should (eq major-mode 'outline-mode)))
+(ert-deftest files-test-set-mode-prop-line ()
+ (find-file (ert-resource-file "file-mode-prop-line"))
+ (should (eq major-mode 'text-mode)))
+
(provide 'files-tests)
;;; files-tests.el ends here