From c99ff6059ffb4028b624d3c325505d3bb1153513 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Pawe=C5=82=20Chmielowski?= <pawel@process-one.net>
Date: Wed, 28 Sep 2022 18:28:24 +0200
Subject: [PATCH] Fix cache invalidation in shared roster

Doing srg_get_info for not existing group, then srg_create, will make
srg_add_user fail because it will get info that group doesn't exist from
cache.
---
 src/mod_shared_roster.erl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/mod_shared_roster.erl b/src/mod_shared_roster.erl
index 7d59e2fc9..69bbc520d 100644
--- a/src/mod_shared_roster.erl
+++ b/src/mod_shared_roster.erl
@@ -422,6 +422,7 @@ create_group(Host, Group, Opts) ->
     end,
     case use_cache(Mod, Host) of
 	true ->
+	    ets_cache:delete(?GROUP_OPTS_CACHE, {Host, Group}, cache_nodes(Mod, Host)),
 	    ets_cache:insert(?GROUP_OPTS_CACHE, {Host, Group}, Opts, cache_nodes(Mod, Host));
 	_ ->
 	    ok