From 598c79ff8603b0821d20c32ffc92cfb81ba9bc26 Mon Sep 17 00:00:00 2001
From: Evgeniy Khramtsov <ekhramtsov@process-one.net>
Date: Sat, 15 Apr 2017 13:36:29 +0300
Subject: [PATCH] Fix cleaning of Riak route table

---
 src/ejabberd_router_riak.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/ejabberd_router_riak.erl b/src/ejabberd_router_riak.erl
index 4b270a41d..d775e989e 100644
--- a/src/ejabberd_router_riak.erl
+++ b/src/ejabberd_router_riak.erl
@@ -74,8 +74,8 @@ clean_table() ->
     case ejabberd_riak:get(route, route_schema()) of
 	{ok, Routes} ->
 	    lists:foreach(
-	      fun(#route{pid = Pid}) ->
-		      ejabberd_riak:delete(route, Pid)
+	      fun(#route{domain = Domain, pid = Pid}) ->
+		      ejabberd_riak:delete(route, {Domain, Pid})
 	      end, Routes);
 	{error, Err} ->
 	    ?ERROR_MSG("failed to clean Riak 'route' table: ~p", [Err]),