diff options
| -rw-r--r-- | toplevel/vernacentries.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index a37cfcf0b4..9ad4fa0121 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -766,6 +766,9 @@ let _ = in fun () -> begin + if (kind = "LETTOP") && not(refining ()) then + errorlabstrm "Vernacentries.StartProof" [< 'sTR + "Let declarations can only be used in proof editing mode" >]; start_proof_com (Some s) stre com; if not (is_silent()) then show_open_subgoals() end |