Change eshell-mode mode-line-format insinuation
* lisp/eshell/esh-mode.el (eshell-mode): Tweak how the mode line is altered after recent mode-line-format changes.
This commit is contained in:
parent
de9359d1d7
commit
34f2878ce2
1 changed files with 1 additions and 1 deletions
|
@ -308,7 +308,7 @@ and the hook `eshell-exit-hook'."
|
|||
(make-local-variable 'eshell-command-running-string)
|
||||
(let ((fmt (copy-sequence mode-line-format)))
|
||||
(setq-local mode-line-format fmt))
|
||||
(let ((mode-line-elt (memq 'mode-line-modified mode-line-format)))
|
||||
(let ((mode-line-elt (cdr (memq 'mode-line-front-space mode-line-format))))
|
||||
(if mode-line-elt
|
||||
(setcar mode-line-elt 'eshell-command-running-string))))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue