commit a759f72

detect reinstall

 1@@ -47,7 +47,10 @@
 2   )
 3 
 4 (define (inst-pkg pkg)
 5-  (msg (format #f "installing package ~a~a~a" "\x1b[33m" pkg "\x1b[m") "->")
 6+  (msg (format #f "~ainstalling package ~a~a~a"
 7+	       (if (file-exists? (format #f "~a/~a/lock" DULL_DB pkg))
 8+		   "re" "")
 9+	       "\x1b[33m" pkg "\x1b[m") "->")
10 
11   ;; determine pkg dir
12   ;; shpuld probably seperate manifest creation
13@@ -105,7 +108,10 @@
14 	  )
15 	(fc (+ n 1))))
16     
17-    (msg (format #f "package ~a~a~a successfully installed" "\x1b[33m" pkg "\x1b[m") "-->")
18+    (msg (format #f "package ~a~a~a successfully ~ainstalled" "\x1b[33m" pkg "\x1b[m"
19+		 (if (file-exists? (format #f "~a/~a/lock" DULL_DB pkg))
20+		     "re" "")
21+		 ) "-->")
22     ))
23 
24 (define (del-pkg pkg)