commit 8947833

usage

 1@@ -10,6 +10,9 @@
 2 
 3 (define (msg a)
 4   (format #t "\x1b[m\x1b[32m==>\x1b[m ~a~%" a))
 5+(define (pmsg a b)
 6+  (format #t "\x1b[m\x1b[31m(~a)\x1b[m ~a~%" a b))
 7+
 8 (define (_warn a)
 9   (format #t "\x1b[m\x1b[33mwarning: \x1b[m~a~%" a))
10 (define (die a n)
11@@ -21,5 +24,7 @@
12   )
13 
14 (define (usage)
15-  (format #t "stub~%")
16+  (format #t "usage: dull <cmd> <pkgs>")
17+  (format #t "       dull y|u|b|i|c|r <pkgs>")
18+  (format #t "       dull m|f|s <pkgs>")
19   )