From 3b7315d011316ebb962c42df48bfa268207005ea Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Thu, 12 May 2022 14:15:12 +0200 Subject: [PATCH] Make prompt read-only in inferior-scheme-mode * lisp/cmuscheme.el (inferior-scheme-mode): Make the prompt read-only to be more consistent with other inferior modes (bug#21118). --- lisp/cmuscheme.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/cmuscheme.el b/lisp/cmuscheme.el index e64d9d28dd6..22a465f5b61 100644 --- a/lisp/cmuscheme.el +++ b/lisp/cmuscheme.el @@ -195,6 +195,7 @@ to continue it." (scheme-mode-variables) (setq mode-line-process '(":%s")) (setq comint-input-filter (function scheme-input-filter)) + (setq-local comint-prompt-read-only t) (setq comint-get-old-input (function scheme-get-old-input))) (defcustom inferior-scheme-filter-regexp "\\`\\s *\\S ?\\S ?\\s *\\'" -- 2.39.2