aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2018-03-03 01:52:11 +0100
committerEmilio Jesus Gallego Arias2018-03-03 01:52:11 +0100
commite2efa0ba532b94ac2267b8d2c3339bfe51e07f25 (patch)
tree182cfeb43434d93a92a2d833d51bc96aa353577a
parentdf9d3a36e71d6d224286811fdc529ad5a955deb7 (diff)
[compat] Remove "Injection L2R Pattern Order"
Following up on #6791, we remove the option "Injection L2R Pattern Order".
-rw-r--r--tactics/equality.ml12
1 files changed, 1 insertions, 11 deletions
diff --git a/tactics/equality.ml b/tactics/equality.ml
index 9a1ac768c7..020fbaf86f 100644
--- a/tactics/equality.ml
+++ b/tactics/equality.ml
@@ -67,20 +67,10 @@ let _ =
optread = (fun () -> !discriminate_introduction);
optwrite = (:=) discriminate_introduction }
-let injection_pattern_l2r_order = ref true
-
let use_injection_pattern_l2r_order = function
- | None -> !injection_pattern_l2r_order
+ | None -> true
| Some flags -> flags.injection_pattern_l2r_order
-let _ =
- declare_bool_option
- { optdepr = true; (* remove in 8.8 *)
- optname = "injection left-to-right pattern order and clear by default when with introduction pattern";
- optkey = ["Injection";"L2R";"Pattern";"Order"];
- optread = (fun () -> !injection_pattern_l2r_order) ;
- optwrite = (fun b -> injection_pattern_l2r_order := b) }
-
let injection_in_context = ref false
let use_injection_in_context = function