Show perl version in the modeline.

This commit is contained in:
Vincent Zhang 2018-08-23 11:05:45 +08:00
parent 558ca30cdd
commit c800b62a19

View file

@ -1131,6 +1131,10 @@ See `mode-line-percent-position'.")
(lambda ()
(when (and (executable-find "ruby") (executable-find "cut") (executable-find "sed"))
(setq doom-modeline-env-command "ruby --version 2>&1 | cut -d' ' -f2 | sed -n '1p'"))))
(add-hook 'perl-mode-hook
(lambda ()
(when (and (executable-find "perl") (executable-find "cut") (executable-find "tr") (executable-find "sed"))
(setq doom-modeline-env-command "perl --version 2>&1 | cut -d'(' -f2 | cut -d')' -f1 | tr -d 'v' | sed -n '2p'"))))
(add-hook 'go-mode-hook
(lambda ()
(when (and (executable-find "go") (executable-find "cut") (executable-find "tr") (executable-find "sed"))