master 3b7315d011 3/3: Make prompt read-only in inferior-scheme-mode

[Lars Ingebrigtsen]

branch: master
commit 3b7315d011316ebb962c42df48bfa268207005ea
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    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 e64d9d28dd..22a465f5b6 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 *\\'"