anoia.system print command if it failed

2023-09-13 17:50:40 +01:00 · 2023-09-13 17:50:40 +01:00 · b3e505abf4
commit b3e505abf4
parent 92e107d77c
1 changed files with 4 additions and 1 deletions
--- a/pkgs/anoia/init.fnl
+++ b/pkgs/anoia/init.fnl
@ -14,7 +14,10 @@
    f (do (f:close) true)
    _ false))

-(fn system [s] (assert (os.execute s)))
+(fn system [s]
+  (match (os.execute s)
+    res res
+    (nil err) (error (.. "Error executing \"" s "\" (" err ")"))))

 (fn hash [str]
  (accumulate [h 5381