procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/comint.el (comint-redirect-setup): Guard mode-line-process (bug#39705)

Browse source
This commit is contained in:
Juri Linkov 2020-02-25 02:22:29 +02:00
parent 7dfe90a666
commit 29eb93e3c3
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/comint.el
View file

@ -3641,7 +3641,7 @@ and does not normally need to be invoked by the end user or programmer."
(setq-local comint-redirect-previous-input-string "")
(setq mode-line-process
(if mode-line-process
(if (and mode-line-process (stringp (elt mode-line-process 0)))
(list (concat (elt mode-line-process 0) " Redirection"))
(list ":%s Redirection")))))