github/doom-modeline
1
0
Fork 0
mirror of https://github.com/correl/doom-modeline.git synced 2024-11-23 11:09:54 +00:00
Code Issues Projects Releases Packages Wiki Activity

No-op if env executable doesn't exist

Browse source
This commit is contained in:
Henrik Lissner 2019-03-12 16:20:30 -04:00 committed by GitHub
parent 72b4ea3741
commit 3d467b7a70
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
doom-modeline-env.el
View file

@ -154,9 +154,10 @@ PARSER should be a function for parsing COMMAND's output line-by-line, to
(defalias ',update-fn (defalias ',update-fn
(lambda () (lambda ()
(when ,enable-var (when ,enable-var
(when-let* ((command (funcall ,command-var))) (when-let* ((command-list (funcall ,command-var))
(setq doom-modeline-env--command (car command) (exe (executable-find (car command-list))))
doom-modeline-env--command-args (cdr command) (setq doom-modeline-env--command exe
doom-modeline-env--command-args (cdr command-list)
doom-modeline-env--parser ,parser-var) doom-modeline-env--parser ,parser-var)
(doom-modeline-update-env)))) (doom-modeline-update-env))))
(format "Updates the %s version string in the modeline." ',name)) (format "Updates the %s version string in the modeline." ',name))