push_roster must convert read strings to binaries (#1075)

processone · Jun 8, 2016 · 4ccc40b · 4ccc40b
1 parent 53f3a45
commit 4ccc40b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/mod_admin_extra.erl b/src/mod_admin_extra.erl
@@ -1166,7 +1166,8 @@ subscribe_roster({Name, Server, Group, Nick}, [{Name, Server, _, _} | Roster]) -
     subscribe_roster({Name, Server, Group, Nick}, Roster);
 %% Subscribe Name2 to Name1
 subscribe_roster({Name1, Server1, Group1, Nick1}, [{Name2, Server2, Group2, Nick2} | Roster]) ->
-    subscribe(Name1, Server1, Name2, Server2, Nick2, Group2, <<"both">>, []),
+    subscribe(Name1, Server1, list_to_binary(Name2), list_to_binary(Server2),
+	list_to_binary(Nick2), list_to_binary(Group2), <<"both">>, []),
     subscribe_roster({Name1, Server1, Group1, Nick1}, Roster).
 
 push_alltoall(S, G) ->