revision 644: | f59072409c7a |
---|---|
parent 643: | f901de70a80e |
child 647: | 74e563ed4537 |
1.1--- a/lisp/lib/cli/clap/cli.lisp Tue Sep 10 21:26:30 2024 -0400 1.2+++ b/lisp/lib/cli/clap/cli.lisp Tue Sep 10 21:52:14 2024 -0400 1.3@@ -53,7 +53,7 @@ 1.4 (t (make-cli :opt :name (format nil "~(~A~)" x) :global t)))) 1.5 opts)) 1.6 1.7-(defun make-cmds (&rest cmds) 1.8+(defun make-cmds (cmds) 1.9 "Make a vector of CLI-CMDs based on CMDS." 1.10 (map 'vector 1.11 (lambda (x)