diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/pp_control.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/pp_control.ml b/lib/pp_control.ml index 3eb10e6dde..34ebf76fc5 100644 --- a/lib/pp_control.ml +++ b/lib/pp_control.ml @@ -76,7 +76,7 @@ let with_output_to ch = let ft = with_fp { fp_output = ch ; fp_output_function = (output ch) ; fp_flush_function = (fun () -> flush ch) } in - set_dflt_gp ft; + set_gp ft deep_gp; ft let std_ft = Format.std_formatter |