edit message

roswell · Aug 10, 2024 · 1a4c850 · 1a4c850
1 parent 5dbd270
commit 1a4c850
Show file tree

Hide file tree

Showing 3 changed files with 6 additions and 2 deletions.
diff --git a/lib/install/main.lisp b/lib/install/main.lisp
@@ -1,7 +1,9 @@
 (uiop:define-package :roswell2.cmd.install/main
   (:use :cl
         :roswell-bin/util
-        :roswell2/main)
+        :roswell2/main
+        :roswell2.cmd.run
+        )
   (:nicknames :roswell2.cmd.install)
   (:import-from :clingon))
 
@@ -20,6 +22,7 @@
   "Handler for just evaluate options"
   (let ((args (clingon:command-arguments cmd)))
     (message :main-handler "args-for install handler ~S" args)
+    (message :install-handler "forms: ~S" *forms*)
     (cond ((null args)
            )
           (t

diff --git a/lib/install/roswell2.cmd.install.asd b/lib/install/roswell2.cmd.install.asd
@@ -3,6 +3,6 @@
   :class :package-inferred-system
   :version "23.8.15.114"
   :author "SANO Masatoshi"
-  :description "Install scripts"
+  :description "Install scripts from system"
   :license "MIT"
   :depends-on (:roswell2.cmd.install/main))
diff --git a/lib/run/main.lisp b/lib/run/main.lisp
@@ -204,6 +204,7 @@
                  (ignore-errors
                    (let* ((path (merge-pathnames "roswell.sexp" (impl-path param)))
                           form)
+                     (message :run-impl "read ~S" path)
                      (unless (uiop:file-exists-p path)
                        (message :run-impl "~S seems not exist... try install: ~S" path param)
                        (install param))