1.1--- a/lisp/lib/cli/clap/proto.lisp Sat Sep 14 22:13:06 2024 -0400
1.2+++ b/lisp/lib/cli/clap/proto.lisp Sat Sep 14 23:55:38 2024 -0400
1.3@@ -16,10 +16,10 @@
1.4 (deferror clap-invalid-argument (clap-error invalid-argument) ())
1.5 (defwarning clap-simple-warning (simple-warning clap-warning) () (:auto t)))
1.6
1.7-(defun clap-unknown-argument (arg &optional kind)
1.8+(defun clap-unknown-argument (arg kind)
1.9 (error 'clap-unknown-argument :name arg :kind kind))
1.10
1.11-(defun clap-missing-argument (arg &optional kind)
1.12+(defun clap-missing-argument (arg kind)
1.13 (error 'clap-missing-argument :item arg :kind kind))
1.14
1.15 (defun clap-invalid-argument (arg &key reason kind)