1.1--- a/lisp/bin/skel.lisp	Wed Sep 11 18:08:29 2024 -0400
     1.2+++ b/lisp/bin/skel.lisp	Wed Sep 11 21:40:01 2024 -0400
     1.3@@ -4,8 +4,8 @@
     1.4 ;;  level. :INPUT :WAIT :OUTPUT
     1.5 (in-package :std-user)
     1.6 (defpkg :bin/skel
     1.7-  (:use :cl :std :cli/clap :cli/clap/vars
     1.8-   :vc :sb-ext :skel :log
     1.9+  (:use :cl :std :cli
    1.10+   :vc :sb-ext :skel :log :cli/clap/util
    1.11    :dat/sxp #+tools :skel/tools/viz)
    1.12   (:import-from :cli/shell :*shell-input* :*shell-directory*)
    1.13   (:use :cli/tools/sbcl)
    1.14@@ -344,12 +344,12 @@
    1.15   (in-package :sk-user)
    1.16   (let ((*log-level* :info))
    1.17     (in-readtable :shell)
    1.18-    (with-cli (opts cmds) *cli*
    1.19+    (with-cli (*cli* opts cmds) (cli:args)
    1.20       (debug-opts *cli*)
    1.21       (init-skel-vars)
    1.22       (when-let ((project (find-skelfile #P".")))
    1.23         (let ((*default-pathname-defaults* (pathname (directory-namestring project))))
    1.24           (setq *skel-project* (load-skelfile project))
    1.25-          (setq *skel-shell* (sk-src *skel-project*))
    1.26+          (setq *skel-path* (sk-src *skel-project*))
    1.27           (setq *shell-directory* (sk-src *skel-project*))))
    1.28       (do-cmd *cli*))))