emacs/test/lisp/files-resources/.dir-locals.el at bcf005fa774194d434c68cc191566b58c297ca86 - mirrors/emacs - Remote Forge of Software

mirrors/emacs

mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 14:30:50 -08:00

Lars Ingebrigtsen 9ac6ff53b1 Make the test for auto-mode-alist from .dir-local.el stricter

* lisp/files.el (set-auto-mode--dir-local-valid-p): New function.
(set-auto-mode--apply-alist): Use it as a stricter test.

2021-07-24 11:16:15 +02:00

5 lines

187 B

EmacsLisp

Raw Blame History

 ;; This is used by files-tests.el.
 ((auto-mode-alist . (("\\.quux\\'" . tcl-mode)
 		     ("\\.zot1\\'" . foobar)
 		     ("\\.zot2\\'" . (lambda ()))
 		     ("\\.zot3\\'" . dired-mode))))