Fix wrong-type-arg number during 'doom upgrade'

This commit is contained in:
Henrik Lissner 2019-07-29 03:21:55 +02:00
parent c28fff4fbf
commit 2304d69898
No known key found for this signature in database
GPG Key ID: 5F6C0EA160557395

View File

@ -33,9 +33,9 @@ following shell commands:
(kill-buffer output))))
(defun doom--working-tree-dirty-p (dir)
(cl-destructuring-bind (code . stdout)
(cl-destructuring-bind (success . stdout)
(doom--sh "git" "status" "--porcelain" "-uno")
(if (zerop code)
(if success
(string-match-p "[^ \t\n]" (buffer-string))
(error "Failed to check working tree in %s" dir))))