commit b7c8fd3

error if a package isnt found

 1@@ -2,12 +2,13 @@
 2 ;; everything will be stubbed todat because i need to implement
 3 ;; package finding and shit
 4 
 5-(define (find-pkg pkg)
 6+(define (_find-pkg pkg)
 7   (let pp (
 8 	   (p (string-split DULL_PATH #\:))
 9 	   (n 0)
10 	   )
11-    (unless (= n (length p))
12+    (if (= n (length p))
13+      #f
14       (let (
15 	    (d (list-ref p n))
16 	    (r #f)
17@@ -18,12 +19,19 @@
18 		      (string=? (basename f) pkg))
19 		 (set! r f))
20 	       #t))
21-      (if r r
22-      (pp p (+ n 1)))
23+	(if r r
24+	  (pp p (+ n 1)))	  
25       ))
26     )
27   )
28 
29+(define (find-pkg pkg)
30+  (if (_find-pkg pkg)
31+      (_find-pkg pkg)
32+    (die (format #f "package ~a not found" pkg) 1)
33+    )
34+  )
35+
36 (define (ver-pkg pkg)
37   (let i (
38 	  (e