Skip to content

Commit 26e035c

Browse files
committed
Use setq-local consistently in inf-clojure-mode
All five setq calls in the mode body should be setq-local for consistency with the existing setq-local on comint-prompt-read-only.
1 parent a37f998 commit 26e035c

1 file changed

Lines changed: 5 additions & 5 deletions

File tree

inf-clojure.el

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -639,17 +639,17 @@ If `comint-use-prompt-regexp' is nil (the default), \\[comint-insert-input] on
639639
following expression. Paragraphs are separated only by blank lines.
640640
Semicolons start comments. If you accidentally suspend your process,
641641
use \\[comint-continue-subjob] to continue it."
642-
(setq comint-input-sender 'inf-clojure--send-string)
643-
(setq comint-prompt-regexp inf-clojure-comint-prompt-regexp)
644-
(setq mode-line-process '(":%s"))
642+
(setq-local comint-input-sender 'inf-clojure--send-string)
643+
(setq-local comint-prompt-regexp inf-clojure-comint-prompt-regexp)
644+
(setq-local mode-line-process '(":%s"))
645645
;; NOTE: Using Tree-sitter based syntax highlighting in comint
646646
;; buffer is currently not possible.
647647
(clojure-mode-variables)
648648
(clojure-font-lock-setup)
649649
(when inf-clojure-enable-eldoc
650650
(inf-clojure-eldoc-setup))
651-
(setq comint-get-old-input #'inf-clojure-get-old-input)
652-
(setq comint-input-filter #'inf-clojure-input-filter)
651+
(setq-local comint-get-old-input #'inf-clojure-get-old-input)
652+
(setq-local comint-input-filter #'inf-clojure-input-filter)
653653
(setq-local comint-prompt-read-only inf-clojure-prompt-read-only)
654654
(add-hook 'comint-preoutput-filter-functions #'inf-clojure-preoutput-filter nil t)
655655
(add-hook 'completion-at-point-functions #'inf-clojure-completion-at-point nil t)

0 commit comments

Comments
 (0)