diff options
| -rw-r--r-- | theories/Init/Prelude.v | 3 | ||||
| -rw-r--r-- | toplevel/coqtop.ml | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/theories/Init/Prelude.v b/theories/Init/Prelude.v index ec2a420156..f9c758054b 100644 --- a/theories/Init/Prelude.v +++ b/theories/Init/Prelude.v @@ -22,5 +22,4 @@ Declare ML Module "ground_plugin". Declare ML Module "dp_plugin". Declare ML Module "recdef_plugin". Declare ML Module "subtac_plugin". -Declare ML Module "xml_plugin". -Global Set Default Proof Mode "Classic". +Declare ML Module "xml_plugin".
\ No newline at end of file diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index 6f3b424e5c..21ecdd5b05 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -315,6 +315,8 @@ let parse_args arglist = let init arglist = Sys.catch_break false; (* Ctrl-C is fatal during the initialisation *) Lib.init(); + (* Default Proofb Mode starts with an alternative default. *) + Goptions.set_string_option_value ["Default";"Proof";"Mode"] "Classic"; begin try let foreign_args = parse_args arglist in |