Fix simple errors in Serval and core

1 files changed, 3 insertions, 2 deletions

diff --git a/Biz/Serval.scm b/Biz/Serval.scm
index 303acdb..0e6be55 100644
--- a/Biz/Serval.scm
+++ b/Biz/Serval.scm
@@ -39,9 +39,10 @@
   #:use-module ((srfi srfi-9)
                 #:select (define-record-type))
   #:use-module ((bs core)
-                #:select (rest fmt prn comment))
+                #:select (first second rest turn fmt prn comment))
   #:use-module ((bs test)
                 #:select (testing))
+  #:use-module ((bs shell) #:prefix Shell.)
   #:export (main))
 
 (define *data-dir* "/var/lib/serval")
@@ -64,7 +65,7 @@
       ["ssh" (run-in-kit! args)]
       ["info" (prn "TODO: show kit")]
       ["ls" ("TODO: list available kits")]
-      [else (prn "help")])))
+      [else (prn "TODO: help text")])))
 
 (define-record-type @Kit
   (Kit name nix-path system-path host-address