liminix

commit 6469408d5fd5ac39d3af8491e177f34702c3e407
parent f020d5b25d60715cc82f9c57eec8190ecd832a79
Author: Daniel Barlow <dan@telent.net>
Date:   Tue, 26 Dec 2023 21:59:00 +0000

run-liminix-vm: don't reverse order of --flags params

Diffstat:
M
pkgs/run-liminix-vm/run-liminix-vm.fnl
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/pkgs/run-liminix-vm/run-liminix-vm.fnl b/pkgs/run-liminix-vm/run-liminix-vm.fnl
@@ -45,7 +45,7 @@
     ["--wan" spec & rest] (assoc (parse-args rest) :wan spec)
     ["--command-line" cmd & rest] (assoc (parse-args rest) :command-line cmd)
     ["--flag" flag & rest] (let [o (parse-args rest)]
-                             (assoc o :flags (doto o.flags (table.insert flag))))
+                             (assoc o :flags (doto o.flags (table.insert 1 flag))))
     [kernel rootfsimg]
     { :flags [] :kernel kernel :rootfs (pad-file rootfsimg (* 16 1024)) }
     ))