aboutsummaryrefslogtreecommitdiff
path: root/lib/pp_control.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/pp_control.ml')
-rw-r--r--lib/pp_control.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/pp_control.ml b/lib/pp_control.ml
index cefd08c559..2cec00a8a3 100644
--- a/lib/pp_control.ml
+++ b/lib/pp_control.ml
@@ -82,6 +82,7 @@ let set_depth_boxes v =
let get_margin () = Some (Format.pp_get_margin !std_ft ())
let set_margin v =
let v = match v with None -> default_margin | Some v -> v in
+ Format.pp_set_margin Format.str_formatter v;
Format.pp_set_margin !std_ft v;
Format.pp_set_margin !deep_ft v