* lisp/net/dictionary.el (dictionary-mode): Use setq-local

This commit is contained in:
Torsten Hilbrich 2020-12-14 09:40:33 +01:00
parent ffa7d6671d
commit 4deb8618e4

View file

@ -380,10 +380,8 @@ is utf-8"
(setq major-mode 'dictionary-mode) (setq major-mode 'dictionary-mode)
(setq mode-name "Dictionary") (setq mode-name "Dictionary")
(make-local-variable 'dictionary-data-stack) (setq-local dictionary-data-stack nil)
(setq dictionary-data-stack nil) (setq-local dictionary-position-stack nil)
(make-local-variable 'dictionary-position-stack)
(setq dictionary-position-stack nil)
(make-local-variable 'dictionary-current-data) (make-local-variable 'dictionary-current-data)
(make-local-variable 'dictionary-positions) (make-local-variable 'dictionary-positions)
@ -407,10 +405,8 @@ is utf-8"
(switch-to-buffer-other-window buffer) (switch-to-buffer-other-window buffer)
(dictionary-mode) (dictionary-mode)
(make-local-variable 'dictionary-window-configuration) (setq-local dictionary-window-configuration window-configuration)
(make-local-variable 'dictionary-selected-window) (setq-local dictionary-selected-window selected-window)
(setq dictionary-window-configuration window-configuration)
(setq dictionary-selected-window selected-window)
(dictionary-check-connection) (dictionary-check-connection)
(dictionary-new-buffer) (dictionary-new-buffer)
(dictionary-store-positions) (dictionary-store-positions)