mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
Avoid errors in forms-mode when default major mode is text
* lisp/forms.el (forms-mode): Bind change-major-mode-with-file-name to nil when calling set-visited-file-name. (Bug#22982)
This commit is contained in:
parent
48196164aa
commit
06aad394ab
1 changed files with 8 additions and 1 deletions
|
|
@ -589,7 +589,14 @@ Commands: Equivalent keys in read-only mode:
|
|||
(make-local-variable 'forms--dynamic-text)
|
||||
|
||||
;; Prevent accidental overwrite of the control file and auto-save.
|
||||
(set-visited-file-name nil)
|
||||
;; We bind change-major-mode-with-file-name to nil to prevent
|
||||
;; set-visited-file-name from calling set-auto-mode, which
|
||||
;; might kill all local variables and set forms-file nil,
|
||||
;; which will then barf in find-file-noselect below. This can
|
||||
;; hapen when the user sets the default major mode that is
|
||||
;; different from the Fundamental mode.
|
||||
(let (change-major-mode-with-file-name)
|
||||
(set-visited-file-name nil))
|
||||
|
||||
;; Prepare this buffer for further processing.
|
||||
(setq buffer-read-only nil)
|
||||
|
|
|
|||
Loading…
Reference in a new issue