aboutsummaryrefslogtreecommitdiff
path: root/lib/options.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/options.ml')
-rw-r--r--lib/options.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/options.ml b/lib/options.ml
index c0f14ee30b..26869e7adc 100644
--- a/lib/options.ml
+++ b/lib/options.ml
@@ -11,10 +11,11 @@ let print_emacs = ref false
let emacs_str s = if !print_emacs then s else ""
-(* Silent *)
+(* Silent / Verbose *)
let silent = ref false
let make_silent flag = silent := flag; ()
let is_silent () = !silent
+let verbose () = not !silent
let silently f x =
let oldsilent = !silent in