atagen/meat
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

account for zero arity fresh command

Browse Source
This commit is contained in:
atagen 2024-11-24 11:18:33 +11:00
parent f67c005e5e
commit c9348daa9a
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
lib/meat.ml
View File

@ -114,12 +114,15 @@ let fresh () =
(match (sub_flag (), all_flag ()) with
| false, false ->
(* no flags, plain flake inputs *)
let flakes = Array.sub argv 2 (argv_len - 2) in
flakes
|> Array.iter (fun f ->
meat_print ("PROCESSING FRESH MEAT " ^ all_caps f ^ "..");
do_cmd ~args:false
("nix flake update " ^ all_low f ^ " --flake $NH_FLAKE"))
(if argv_len > 3 then
let flakes = Array.sub argv 2 (argv_len - 2) in
flakes
|> Array.iter (fun f ->
meat_print ("PROCESSING FRESH MEAT " ^ all_caps f ^ "..");
do_cmd ~args:false
("nix flake update " ^ all_low f ^ " --flake $NH_FLAKE"));
else
do_cmd ("nix flake update --flake $NH_FLAKE"))
| _, true ->
(* all flag, update all subflakes and main flake inputs *)
walk base_dir |> List.sort compdepth |> List.rev |> submeats;