aboutsummaryrefslogtreecommitdiff
path: root/tactics/redexpr.ml
diff options
context:
space:
mode:
Diffstat (limited to 'tactics/redexpr.ml')
-rw-r--r--tactics/redexpr.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/redexpr.ml b/tactics/redexpr.ml
index aabfae444e..7ff88bb4b7 100644
--- a/tactics/redexpr.ml
+++ b/tactics/redexpr.ml
@@ -262,7 +262,7 @@ let subst_red_expr subs =
Redops.map_red_expr_gen
(subst_mps subs)
(Mod_subst.subst_evaluable_reference subs)
- (Patternops.subst_pattern subs)
+ (Patternops.subst_pattern (Global.env()) subs)
let inReduction : bool * string * red_expr -> obj =
declare_object