+1 -1

lib/dune

reviewed

··· 1 1 (library 2 2 (name homebrew) 3 3 (public_name homebrew) 4 4 - (libraries yamlt jsont bos fmt fpath logs digestif astring)) 4 4 + (libraries yamlt jsont bos fmt fpath logs digestif astring tty))

+2 -1

lib/homebrew.ml

reviewed

··· 742 742 Ok () 743 743 744 744 let timed name f = 745 745 + let bar = Tty.Progress.v ~color:(`Hex (0x19, 0x96, 0xf3)) ~total:1 name in 745 746 let t0 = Unix.gettimeofday () in 746 747 let result = f () in 747 748 let t1 = Unix.gettimeofday () in 748 748 - Log.app (fun m -> m "%s (%.1fs)" name (t1 -. t0)); 749 749 + Tty.Progress.finish ~message:(Fmt.str "%.1fs" (t1 -. t0)) bar; 749 750 result 750 751 751 752 let bottle_checksums bottles =