changelog shortlog graph tags branches changeset file revisions annotate raw help

Mercurial > core / lisp/bin/skel.lisp

revision 584: 35bb0d5ec95e
parent 570: d1c75054df03
child 623: a304c9713a51
     1.1--- a/lisp/bin/skel.lisp	Thu Aug 08 23:01:20 2024 -0400
     1.2+++ b/lisp/bin/skel.lisp	Sat Aug 10 00:30:45 2024 -0400
     1.3@@ -4,7 +4,7 @@
     1.4 ;;  level. :INPUT :WAIT :OUTPUT
     1.5 (in-package :std-user)
     1.6 (defpkg :bin/skel
     1.7-  (:use :cl :std :cli/clap
     1.8+  (:use :cl :std :cli/clap :cli/clap/vars
     1.9    :vc :sb-ext :skel :log
    1.10    :dat/sxp #+tools :skel/tools/viz)
    1.11   (:import-from :cli/shell :*shell-input*)
    1.12@@ -231,11 +231,11 @@
    1.13   :name "skel"
    1.14   :version #.(format nil "0.1.1:~A" (read-line (sb-ext:process-output (vc:run-hg-command "id" '("-i") :stream))))
    1.15   :description "A hacker's project compiler."
    1.16-  :thunk skc-show
    1.17+  :thunk 'skc-show
    1.18   :opts ((:name "help" :global t :description "print this message" 
    1.19-	  :thunk skc-help)
    1.20-	 (:name "version" :global t :description "print version" 
    1.21-	  :thunk skc-version)
    1.22+	   :thunk skc-help)
    1.23+	  (:name "version" :global t :description "print version" 
    1.24+	   :thunk skc-version)
    1.25 	 (:name "level" :global t :description "set log level (warn,info,debug,trace)"
    1.26 	  :thunk skc-level)
    1.27 	 (:name "config" :global t :description "set a custom skel user config" :kind file)
    1.28@@ -243,7 +243,7 @@
    1.29 	 (:name "output" :global t :description "output target" :kind string))
    1.30   :cmds ((:name init
    1.31 	  :description "initialize a skelfile in the current directory"
    1.32-          :opts ((:name "name" :description "project name" :kind string))
    1.33+          :opts (:name "name" :description "project name" :kind string)
    1.34           :thunk skc-init)
    1.35          (:name new
    1.36           :description "make a new skel project"