Commit d46f4c31 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

tools: Simplify a ,@ into a ,

parent 49b88122
......@@ -144,8 +144,7 @@ and which systems to test loading with ASDF_TEST_SYSTEMS or s=
(multiple-value-bind (decl body) (decl-and-body decl-and-body)
`(defun ,name ,@(if largs `((&optional ,@largs))
(list nil))
`(defun ,name ,(and largs `(&optional ,@largs))
(with-failure-context (:name ,(command-name name))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment