Use s.el instead of subr-x string funcs

This commit is contained in:
Henrik Lissner 2017-03-25 01:45:23 -04:00
parent 2526101de6
commit 2a377b44f1
6 changed files with 7 additions and 7 deletions

View file

@ -22,11 +22,11 @@
"Runs a shell command and prints any output to the DOOM buffer."
(let ((cmd-list (split-string command " ")))
(cond ((equal (car cmd-list) "sudo")
(apply 'doom-sudo (string-join (cdr cmd-list) " ") args))
(apply 'doom-sudo (s-join " " (cdr cmd-list)) args))
((let ((bin (executable-find "npm")))
(and (file-exists-p bin)
(not (file-writable-p bin))))
(apply 'doom-sudo (string-join cmd-list " ") args))
(apply 'doom-sudo (s-join " " cmd-list) args))
(t
(princ (shell-command-to-string (apply 'format command args)))))))