diff options
| author | Jim Fehrle | 2019-05-07 12:04:34 -0700 |
|---|---|---|
| committer | Jim Fehrle | 2019-05-07 14:27:47 -0700 |
| commit | 21e5a5d510de59a33f3e6a0f88b8321ac0d7d23d (patch) | |
| tree | ac4aa8969fdb4277880b1a29c5c05e0c1ce4c2a5 /vernac | |
| parent | e30d52a3c724a71bf43b46416c09e4b6ef1d1f67 (diff) | |
Show diffs in error messages only if Diffs is enabled
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/himsg.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/vernac/himsg.ml b/vernac/himsg.ml index 082b22b373..f58eeae6dc 100644 --- a/vernac/himsg.ml +++ b/vernac/himsg.ml @@ -150,6 +150,7 @@ let explicit_flags = [print_universes; print_implicits; print_coercions; print_no_symbol] (* and more! *) ] let with_diffs pm pn = + if not (Proof_diffs.show_diffs ()) then pm, pn else try let tokenize_string = Proof_diffs.tokenize_string in Pp_diff.diff_pp ~tokenize_string pm pn |