aboutsummaryrefslogtreecommitdiffhomepage
path: root/proofs
diff options
context:
space:
mode:
Diffstat (limited to 'proofs')
-rw-r--r--proofs/pfedit.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/pfedit.ml b/proofs/pfedit.ml
index a9a8e0d3b..9fc376855 100644
--- a/proofs/pfedit.ml
+++ b/proofs/pfedit.ml
@@ -260,7 +260,7 @@ let start_proof_with_type na str env concl =
let start_proof na str concl_com =
let sigma = Evd.empty in
let env = Global.env() in
- let concl = fconstruct_type sigma (Environ.context env) concl_com in
+ let concl = type_of_com env concl_com in
start_proof_with_type na str env concl.body
let start_proof_constr na str concl =