Fix bin/doom misinterpreting wrong-num-of-args errors

This commit is contained in:
Henrik Lissner 2019-07-29 20:58:02 +02:00
parent c32244ad4e
commit 4e305dd2ab
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -112,18 +112,15 @@ If SHOW-HELP is non-nil, show the documentation for said dispatcher."
(let ((start-time (current-time)))
(run-hooks 'doom-cli-pre-execute-hook)
(unwind-protect
(condition-case e
(when-let (ret (apply fn args))
(print!
"\n%s"
(success "Finished! (%.4fs)"
(float-time
(time-subtract (current-time)
start-time))))
(run-hooks 'doom-cli-post-execute-hook)
ret)
('wrong-number-of-arguments
(user-error "I don't understand 'doom %s %s'\n\nRun 'doom help' to see what I do understand." cmd (string-join args " "))))
(when-let (ret (apply fn args))
(print!
"\n%s"
(success "Finished! (%.4fs)"
(float-time
(time-subtract (current-time)
start-time))))
(run-hooks 'doom-cli-post-execute-hook)
ret)
(run-hooks 'doom-cli-post-error-execute-hook))))))
(defmacro defcligroup! (name docstring &rest body)