Commit 9f370a90 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(inferior-scheme-mode):

Don't let `comint-prompt-regexp' match more than one line.
parent 50e268ea
...@@ -180,7 +180,7 @@ to continue it." ...@@ -180,7 +180,7 @@ to continue it."
(interactive) (interactive)
(comint-mode) (comint-mode)
;; Customise in inferior-scheme-mode-hook ;; Customise in inferior-scheme-mode-hook
(setq comint-prompt-regexp "^[^>]*>+ *") ; OK for cscheme, oaklisp, T,... (setq comint-prompt-regexp "^[^>\n]*>+ *") ; OK for cscheme, oaklisp, T,...
(scheme-mode-variables) (scheme-mode-variables)
(setq major-mode 'inferior-scheme-mode) (setq major-mode 'inferior-scheme-mode)
(setq mode-name "Inferior Scheme") (setq mode-name "Inferior Scheme")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment