From 58ad1380a4352c866f43adbb441655a02b651948 Mon Sep 17 00:00:00 2001
From: Jakub Witczak <kuba@erlang.org>
Date: Mon, 18 Nov 2024 15:31:57 +0100
Subject: [PATCH] common_test: cth surefire skip group fix

---
 lib/common_test/src/cth_surefire.erl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lib/common_test/src/cth_surefire.erl b/lib/common_test/src/cth_surefire.erl
index 578bdd616346..081fc3c49cda 100644
--- a/lib/common_test/src/cth_surefire.erl
+++ b/lib/common_test/src/cth_surefire.erl
@@ -245,6 +245,9 @@ get_line_from_result(_, _) ->
 on_tc_skip(Suite,TC,Result,Proxy) when is_pid(Proxy) ->
     _ = gen_server:call(Proxy,{?FUNCTION_NAME, [Suite,TC,Result]}),
     Proxy;
+on_tc_skip(Suite,{ConfigFunc = end_per_group,_GrName}, Res, State) ->
+    on_tc_skip(Suite,ConfigFunc, Res,
+               State#state{curr_group = tl(State#state.curr_group)});
 on_tc_skip(Suite,{ConfigFunc,_GrName}, Res, State) ->
     on_tc_skip(Suite,ConfigFunc, Res, State);
 on_tc_skip(Suite,Tc, Res, State0) ->