Fix calls to undefined functions

diff --git a/src/mod_irc.erl b/src/mod_irc.erl
index 91f43716feb84012deb760bcee74b1a66567302b..1960c988d46eaf70df4e8aad74a1b1d4b3fe8edf 100644 (file)
--- a/src/mod_irc.erl
+++ b/src/mod_irc.erl
@@ -330,7 +330,7 @@ process_command(#iq{type = set, lang = Lang, to = To, from = From,
            catch E:R ->
                    ?ERROR_MSG("ad-hoc handler failed: ~p",
                               [{E, {R, erlang:get_stacktrace()}}]),
-                   xmpp:make_error(IQ, xmpp:internal_server_error())
+                   xmpp:make_error(IQ, xmpp:err_internal_server_error())
            end;
        _ ->
            Txt = <<"Node not found">>,
@@ -409,7 +409,7 @@ iq_disco(_ServerHost, undefined, Lang) ->
        features = [?NS_DISCO_INFO, ?NS_DISCO_ITEMS, ?NS_MUC,
                   ?NS_REGISTER, ?NS_VCARD, ?NS_COMMANDS]};
 iq_disco(ServerHost, Node, Lang) ->
-    case lists:keyfind(Node, commands(ServerHost)) of
+    case lists:keyfind(Node, 1, commands(ServerHost)) of
        {_, Name, _} ->
            #disco_info{
               identities = [#identity{category = <<"automation">>,
@@ -645,7 +645,7 @@ adhoc_join(_From, _To, #adhoc_command{lang = Lang, xdata = undefined} = Request)
                                      type = 'text-single',
                                      label = translate:translate(Lang, <<"IRC server">>),
                                      required = true}]},
-    xmpp_utils:make_adhoc_response(
+    xmpp_util:make_adhoc_response(
       Request, #adhoc_command{status = executing, xdata = X});
 adhoc_join(From, To, #adhoc_command{lang = Lang, xdata = X} = Request) ->
     Channel = case xmpp_util:get_xdata_values(<<"channel">>, X) of

diff --git a/src/mod_irc_connection.erl b/src/mod_irc_connection.erl
index fb301330a1ce16741e5e4f62b142603471d4b366..694accf45e5e95731b4d7aebc99f6057f47880f1 100644 (file)
--- a/src/mod_irc_connection.erl
+++ b/src/mod_irc_connection.erl
@@ -1167,7 +1167,7 @@ iq_admin(StateData, Channel, From, To,
            ?ERROR_MSG("failed to process admin query from ~s: ~p",
                       [jid:to_string(From), {E, {R, erlang:get_stacktrace()}}]),
            ejabberd_router:route_error(
-             To, From, IQ, xmpp:internal_server_error())
+             To, From, IQ, xmpp:err_internal_server_error())
     end.
 
 process_iq_admin(_StateData, _Channel, set, #muc_admin{items = []}) ->