Fix how `shell-mode' avoids being called interactively
* lisp/shell.el (shell-mode): Make noninteractive instead of erroring out after being called.
This commit is contained in:
parent
43ecde8578
commit
8d517daf77
1 changed files with 1 additions and 2 deletions
|
@ -556,8 +556,7 @@ Variables `comint-output-filter-functions', a hook, and
|
|||
`comint-scroll-to-bottom-on-input' and `comint-scroll-to-bottom-on-output'
|
||||
control whether input and output cause the window to scroll to the end of the
|
||||
buffer."
|
||||
(when (called-interactively-p 'any)
|
||||
(error "Can't be called interactively; did you mean `shell-script-mode' instead?"))
|
||||
:interactive nil
|
||||
(setq comint-prompt-regexp shell-prompt-pattern)
|
||||
(shell-completion-vars)
|
||||
(setq-local paragraph-separate "\\'")
|
||||
|
|
Loading…
Add table
Reference in a new issue