Fix compiler warnings regarding test cases

test/ejabberd_SUITE.erl

@@ -907,7 +907,6 @@ presence_broadcast(Config) ->
     B64Ver = base64:encode(Ver),
     Node = <<(?EJABBERD_CT_URI)/binary, $#, B64Ver/binary>>,
     Server = ?config(server, Config),
-    ServerJID = server_jid(Config),
     Info = #disco_info{identities =
 			   [#identity{category = <<"client">>,
 				      type = <<"bot">>,

test/privacy_tests.erl

@@ -710,7 +710,7 @@ check_presence_blocked(Config, Reason) ->
 	      #stanza_error{reason = Reason} = xmpp:get_error(Err)
       end, [available, unavailable]).
 
-recv_roster_pushes(Config, 0) ->
+recv_roster_pushes(_Config, 0) ->
     ok;
 recv_roster_pushes(Config, Count) ->
     receive
@@ -719,7 +719,6 @@ recv_roster_pushes(Config, Count) ->
     end.
 
 recv_err_and_roster_pushes(Config, Count) ->
-    PeerJID = ?config(master, Config),
     recv_roster_pushes(Config, Count),
     recv_presence(Config).
 

test/upload_tests.erl

@@ -149,13 +149,13 @@ slot_request(Config, NS) ->
 	    {GetURL, PutURL, Filename, Size}
     end.
 
-put_request(Config, URL0, Data) ->
+put_request(_Config, URL0, Data) ->
     ct:comment("Putting ~B bytes to ~s", [size(Data), URL0]),
     URL = binary_to_list(URL0),
     {ok, {{"HTTP/1.1", 201, _}, _, _}} =
 	httpc:request(put, {URL, [], ?CONTENT_TYPE, Data}, [], []).
 
-get_request(Config, URL0, Data) ->
+get_request(_Config, URL0, Data) ->
     ct:comment("Getting ~B bytes from ~s", [size(Data), URL0]),
     URL = binary_to_list(URL0),
     {ok, {{"HTTP/1.1", 200, _}, _, Body}} =