commit 143ea8c
chld
·
2026-09-12 13:30:27 +0000 UTC
parent f39283c
color :>
M
main.scm
+0,
-1
1@@ -31,7 +31,6 @@
2 (exit 1))
3 )
4
5-(msg "parsing args")
6 (let pargs
7 (
8 (n 0)
M
pkg.scm
+2,
-2
1@@ -41,7 +41,7 @@
2 )
3
4 (begin
5- (die (format #f "pkg dir for package ~a not found (~a)" pkg dp) 1)
6+ (die (format #f "pkg dir for package ~a~a~a not found (~a)" "\x1b[33m" pkg "\x1b[0m" dp) 1)
7 )
8 )
9 )
10@@ -54,7 +54,7 @@
11 (pl (format #f "~a/~a/lock" DULL_DB pkg))
12 )
13 (unless (file-exists? pl)
14- (die (format #f "package ~a does not have a lock file (not installed?)" pkg) 2)
15+ (die (format #f "package ~a~a~a does not have a lock file (not installed?)" "\x1b[33m" pkg "\x1b[0m") 2)
16 )
17 )
18 )