diff options
| author | Xavier Clerc | 2014-08-21 09:33:57 +0200 |
|---|---|---|
| committer | Xavier Clerc | 2014-08-21 09:39:02 +0200 |
| commit | 04d4f9e95284a25b1543a75e814084f6307797c0 (patch) | |
| tree | 2aee9844ca880329a014e2ae5b65e64fac28addb | |
| parent | 4943d6b851466c22823a356d3fae7052ea47d663 (diff) | |
Do not drop the locality qualifier (beautifier).
| -rw-r--r-- | printing/ppvernac.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 666c0c6d3f..ad3c74e8ac 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -130,7 +130,7 @@ let pr_search a b pr_p = match a with | SearchRewrite c -> str"SearchRewrite" ++ spc() ++ pr_p c ++ pr_in_out_modules b | SearchAbout sl -> str"Search" ++ spc() ++ prlist_with_sep spc pr_search_about sl ++ pr_in_out_modules b -let pr_locality local = if local then str "Local " else mt () +let pr_locality local = if local then str "Local" else str "Global" let pr_explanation (e,b,f) = let a = match e with |