Fix list unblocking when Riak is used as a backend

diff --git a/src/mod_blocking.erl b/src/mod_blocking.erl
index 241a29f0e400c8ae572a6cf07680ad5c194a494c..0f57ce72347631e68f3d987245946c98918a76d0 100644 (file)
--- a/src/mod_blocking.erl
+++ b/src/mod_blocking.erl
@@ -299,7 +299,8 @@ process_blocklist_unblock_all(LUser, LServer, Filter,
                      NewList = Filter(List),
                      NewLists1 = lists:keydelete(Default, 1, Lists),
                      NewLists = [{Default, NewList} | NewLists1],
-                     case ejabberd_riak:put(P#privacy{lists = NewLists}) of
+                     case ejabberd_riak:put(P#privacy{lists = NewLists},
+                                           mod_privacy:privacy_schema()) of
                          ok ->
                              {ok, Default, NewList};
                          Err ->