added pooler:rm_group/1 test for empty group

test/pooler_tests.erl

@@ -470,10 +470,22 @@ pooler_groups_test_() ->
        fun() ->
                ?assertEqual(ok, pooler:rm_group(i_dont_exist))
        end},
+
+      {"rm_group with existing empty group",
+       fun() ->
+               ?assertEqual(ok, pooler:rm_pool(test_pool_1)),
+               ?assertEqual(ok, pooler:rm_pool(test_pool_2)),
+               ?assertEqual(ok, pooler:rm_group(group_1)),
+
+               ?assertExit({noproc, _}, pooler:take_member(test_pool_1)),
+               ?assertExit({noproc, _}, pooler:take_member(test_pool_2)),
+               ?assertEqual({error_no_group, group_1},
+                            pooler:take_group_member(group_1))
+       end},
       
-      {"rm_group with existing group",
+      {"rm_group with existing non-empty group",
        fun() ->
-               %% Group exists to begin with
+               %% Verify that group members exist
                MemberPid = pooler:take_group_member(group_1),
                ?assert(is_pid(MemberPid)),
                pooler:return_group_member(group_1, MemberPid),