From 332de67fe266be09767d6c80e87e732368538885 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Mon, 1 Jun 2009 21:04:16 +0000
Subject: [PATCH] Fix some calls to exmpp

SVN Revision: 2138
---
 src/ejabberd_c2s.erl          | 4 ++--
 src/mod_muc/mod_muc_room.erl  | 2 +-
 src/mod_pubsub/mod_pubsub.erl | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/ejabberd_c2s.erl b/src/ejabberd_c2s.erl
index 8569fcea9..9fd4a3767 100644
--- a/src/ejabberd_c2s.erl
+++ b/src/ejabberd_c2s.erl
@@ -333,7 +333,7 @@ wait_for_stream({xmlstreamstart, #xmlel{ns = NS} = Opening}, StateData) ->
 				    send_element(StateData,
 				      exmpp_xml:append_child(Header,
 					exmpp_stream:error('policy-violation',
-					  "en", "Use of STARTTLS required"))),
+					  {"en", "Use of STARTTLS required"}))),
 				    {stop, normal, StateData};
 				true ->
 				    send_element(StateData, Header),
@@ -598,7 +598,7 @@ wait_for_feature_request({xmlstreamelement, #xmlel{ns = NS, name = Name} = El},
 	    if
 		(SockMod == gen_tcp) and TLSRequired ->
 		    send_element(StateData, exmpp_stream:error(
-			'policy-violation', "en", "Use of STARTTLS required")),
+			'policy-violation', {"en", "Use of STARTTLS required"})),
 		    send_element(StateData, exmpp_stream:closing()),
 		    {stop, normal, StateData};
 		true ->
diff --git a/src/mod_muc/mod_muc_room.erl b/src/mod_muc/mod_muc_room.erl
index b68878ee3..11d029ed2 100644
--- a/src/mod_muc/mod_muc_room.erl
+++ b/src/mod_muc/mod_muc_room.erl
@@ -2213,7 +2213,7 @@ process_admin_items_set(UJID, Items, Lang, StateData) ->
 					            SD;
                      %% TODO: <<>> or 'undefined' ?
                      %% TODO: double case on the E var, because 
-                     %%       exmpp_jid:lnode/1 can't be used in guards
+                     %%       exmpp_jid:prep_node/1 can't be used in guards
 					 %% If the provided JID does not have username,
 					 %% forget the affiliation completely
                             _ -> case E of 
diff --git a/src/mod_pubsub/mod_pubsub.erl b/src/mod_pubsub/mod_pubsub.erl
index 7ce313d3d..36d03f689 100644
--- a/src/mod_pubsub/mod_pubsub.erl
+++ b/src/mod_pubsub/mod_pubsub.erl
@@ -433,7 +433,7 @@ send_loop(State) ->
 			    ServerHost ->  %% local contacts
 				case ejabberd_sm:get_user_resources(U, S) of
 				[] -> %% offline
-				    PeerJID = exmpp_jlib:make_jid(U, S, R),
+				    PeerJID = exmpp_jid:make(U, S, R),
 				    self() ! {presence, User, Server, [Resource], PeerJID};
 				_ -> %% online
 				    % this is already handled by presence probe