revamp look command

This commit is contained in:
atagen 2024-11-23 17:27:52 +11:00
parent 245f62ed41
commit ce7b751c6f

View File

@ -55,7 +55,10 @@ let gut () =
let look () =
print_string header;
meat_print "INSPECTING MEAT..";
do_cmd "nix flake info $NH_FLAKE";
meat_print "CONSUMING MEATS:";
do_cmd "nix flake metadata $NH_FLAKE";
meat_print "PRODUCING MEATS:";
do_cmd "nix flake show $NH_FLAKE";
print_string footer
let all_flag () = Array.mem "-a" argv || Array.mem "--all" argv