diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2017-04-28 11:25:29 +0200 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2017-04-28 11:25:29 +0200 |
commit | 66a68a4329ce199f25184ba8b2d98b4679e7ddae (patch) | |
tree | ce90c93341c58e82813da8b1a567ce6a3f3ed424 /ide | |
parent | 0a255f51809e8d29a7239bfbd9fe57a8b2b41705 (diff) | |
parent | 2ddc9d12bd4616f10245c40bc0c87ae548911809 (diff) |
Merge PR#531: Fixing bug #5420 and many similar bugs due to the presence of let-ins
Diffstat (limited to 'ide')
-rw-r--r-- | ide/texmacspp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/texmacspp.ml b/ide/texmacspp.ml index e20704b7f..05f1820cf 100644 --- a/ide/texmacspp.ml +++ b/ide/texmacspp.ml @@ -552,7 +552,7 @@ let rec tmpp v loc = let str_dk = Kindops.string_of_definition_kind (l, false, dk) in let str_id = Id.to_string id in (xmlDef str_dk str_id loc [pp_expr e]) - | VernacStartTheoremProof (tk, [ Some ((_,id),_), ([], statement, None) ], b) -> + | VernacStartTheoremProof (tk, [ Some ((_,id),_), ([], statement) ], b) -> let str_tk = Kindops.string_of_theorem_kind tk in let str_id = Id.to_string id in (xmlThm str_tk str_id loc [pp_expr statement]) |