Allow --verbose to control whether yum messages are verbose.

[febootstrap.git] / febootstrap_cmdline.ml

diff --git a/febootstrap_cmdline.ml b/febootstrap_cmdline.ml
index 3ce1029..92fd677 100644 (file)
--- a/febootstrap_cmdline.ml
+++ b/febootstrap_cmdline.ml
@@ -77,6 +77,7 @@ let excludes = List.rev !excludes
 let names_mode = !names_mode
 let outputdir = !outputdir
 let packages = List.rev !packages
+let verbose = !verbose
 let warnings = !warnings
 
-let debug fs = ksprintf (fun str -> if !verbose then print_endline str) fs
+let debug fs = ksprintf (fun str -> if verbose then print_endline str) fs