diff options
Diffstat (limited to 'tactics/autorewrite.ml')
-rw-r--r-- | tactics/autorewrite.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/autorewrite.ml b/tactics/autorewrite.ml index 329198ccc..8a09ff789 100644 --- a/tactics/autorewrite.ml +++ b/tactics/autorewrite.ml @@ -114,7 +114,7 @@ let autorewrite ?(conds=Naive) tac_main lbas = let autorewrite_multi_in ?(conds=Naive) idl tac_main lbas = (* let's check at once if id exists (to raise the appropriate error) *) - Goal.sensitive_list_map Tacmach.New.pf_get_hyp idl >>- fun _ -> + Proofview.Goal.lift (Goal.sensitive_list_map Tacmach.New.pf_get_hyp_sensitive idl) >>- fun _ -> let general_rewrite_in id = let id = ref id in let to_be_cleared = ref false in |