diff options
| -rw-r--r-- | tactics/tactics.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tactics.ml b/tactics/tactics.ml index 3e37ea998a..fe605da8ef 100644 --- a/tactics/tactics.ml +++ b/tactics/tactics.ml @@ -3818,7 +3818,7 @@ module New = struct let refine c = let c = Goal.Refinable.make begin fun h -> - Goal.Refinable.constr_of_open_constr h false c + Goal.Refinable.constr_of_open_constr h true c end in Proofview.Goal.lift c >>= fun c -> Proofview.tclSENSITIVE (Goal.refine c) |