ryuslash/eshell-fringe-status
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Only add status arrow after a command

Browse source
This commit is contained in:
Tom Willemse 2014-01-26 23:02:31 +01:00
parent 0419f1ba92
commit 2f698a53d7
1 changed files with 9 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
eshell-fringe-status.el
View file

@ -90,14 +90,15 @@ disabling the mode."
This indication is shown as a bitmap in the left fringe of the This indication is shown as a bitmap in the left fringe of the
window." window."
(save-excursion (when eshell-last-command-name
(beginning-of-line) (save-excursion
(insert (beginning-of-line)
(propertize " " 'display (let ((face (if (zerop eshell-last-command-status)
`((left-fringe efs--arrow-bitmap 'eshell-fringe-status-success
,(if (zerop eshell-last-command-status) 'eshell-fringe-status-failure)))
'eshell-fringe-status-success (insert
'eshell-fringe-status-failure))))))) (propertize " " 'display
`((left-fringe efs--arrow-bitmap ,face))))))))
;;;###autoload ;;;###autoload
(define-minor-mode eshell-fringe-status-mode (define-minor-mode eshell-fringe-status-mode