Merge pull request #2153 from tolbrino/tb-fix-ct-retry

Fix case clause which used wrong element order

1 files changed, 2 insertions, 2 deletions

diff --git a/src/cth_retry.erl b/src/cth_retry.erl
index 7056c71..b745c35 100644
--- a/src/cth_retry.erl
+++ b/src/cth_retry.erl
@@ -94,7 +94,7 @@ on_tc_skip(Suite, TC, {tc_auto_skip, _}, State=#state{suite=Suite, groups=Groups
         {end_per_group, _} -> Acc;
         init_per_suite -> Acc;
         end_per_suite -> Acc;
-        {_Group, Case} -> [{Suite, Groups, Case}|Acc];
+        {Case, _Group} -> [{Suite, Groups, Case}|Acc];
         TC -> [{Suite, Groups, TC}|Acc]
     end,
     State#state{suite=Suite, acc=NewAcc};
@@ -111,7 +111,7 @@ on_tc_skip(TC, {tc_auto_skip, _}, State=#state{suite=Suite, groups=Groups, acc=A
         {end_per_group, _} -> Acc;
         init_per_suite -> Acc;
         end_per_suite -> Acc;
-        {_Group, Case} -> [{Suite, Groups, Case}|Acc];
+        {Case, _Group} -> [{Suite, Groups, Case}|Acc];
         TC -> [{Suite, Groups, TC}|Acc]
     end,
     State#state{acc=NewAcc};