Fix infinite recursion of conf-mode

* lisp/textmodes/conf-mode.el (conf-mode): Inhibit recursion when
called from file-local variables (bug#50126).
This commit is contained in:
Lars Ingebrigtsen 2021-08-20 15:55:24 +02:00
parent 657fe8b9d8
commit c2026cf366

View file

@ -420,7 +420,11 @@ See also `conf-space-mode', `conf-colon-mode', `conf-javaprop-mode',
(advice-add 'conf-mode :around
(lambda (orig-fun)
"Redirect to one of the submodes when called directly."
(funcall (if delay-mode-hooks orig-fun (conf--guess-mode)))))
;; The file may have "mode: conf" in the local variable
;; block, in which case we'll be called recursively
;; infinitely. Inhibit that.
(let ((enable-local-variables nil))
(funcall (if delay-mode-hooks orig-fun (conf--guess-mode))))))