1.1--- a/lisp/bin/skel.lisp Sat Sep 21 18:18:14 2024 -0400
1.2+++ b/lisp/bin/skel.lisp Sat Sep 21 22:58:22 2024 -0400
1.3@@ -59,7 +59,7 @@
1.4 #P".")
1.5 :load t)))
1.6
1.7-#+tools
1.8+#+gui
1.9 (defcmd skc-view
1.10 (if *args*
1.11 (let ((stuff (loop for a in *args*
1.12@@ -132,7 +132,7 @@
1.13 (defcmd skc-show
1.14 (if *args*
1.15 (mapc (lambda (x) (when-let ((ret (sk-slot-case x))) (println ret))) *args*)
1.16- (describe (if (boundp '*skel-project*) *skel-project*
1.17+ (sk-print (if (boundp '*skel-project*) *skel-project*
1.18 (if (boundp '*skel-user-config*) *skel-user-config*
1.19 (if (boundp '*skel-system-config*) *skel-system-config*
1.20 (skel-simple-error "skel config files not installed")))))))