aboutsummaryrefslogtreecommitdiff
path: root/tactics
diff options
context:
space:
mode:
Diffstat (limited to 'tactics')
-rw-r--r--tactics/equality.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/equality.ml b/tactics/equality.ml
index 8a6291c2d5..2108301c37 100644
--- a/tactics/equality.ml
+++ b/tactics/equality.ml
@@ -932,7 +932,7 @@ let injClause cls gls =
with
| Not_found ->
errorlabstrm "InjClause" (not_found_message id)
- | UserError("refiner__FAIL",_) ->
+ | UserError("refiner__fail",_) ->
errorlabstrm "InjClause"
[< 'sTR (string_of_id id); 'sTR" Not a projectable equality" >]