Shell now uses path and it's own REPL

shell.scm

@@ -1,12 +1,12 @@
 (use shell)
-(include "../macs/general-macs.scm")
 
-(define-syntax mk-shell-cmd
+(define (shell-repl)
-  (syntax-rules ()
+  (let ((x (read)))
-    ((mk-shell-cmd cmd)
+    (if (eq? x 'exit)
-     (define-syntax cmd
+        #t
-       (syntax-rules ()
+        (begin (execute (list x))
-         ((cmd . r)
+               (newline)
-          (execute '((cmd . r)))))))))
+               (display "#;> ")
+               (shell-repl)))))
 
-(mac-apply mk-shell-cmd ls pwd cat rm touch cd ps grep kill killall mkdir mv top alsamixer nano emacs git)
+(shell-repl)