mirror of
https://github.com/processone/ejabberd.git
synced 2024-11-24 16:23:40 +01:00
* src/acl.erl: Remove compilation warnings (EJAB-290).
SVN Revision: 840
This commit is contained in:
parent
e9bbed2299
commit
bf6e5a0d26
@ -1,5 +1,7 @@
|
||||
2007-07-30 Mickael Remond <mickael.remond@process-one.net>
|
||||
|
||||
* src/acl.erl: Remove compilation warnings (EJAB-290).
|
||||
|
||||
* src/xml_stream.erl: Group CDATA on a single xmlcdata
|
||||
node (splitting is not relevant as dependant on TCP/IP packet
|
||||
fragmentation) (EJAB-292).
|
||||
|
@ -115,7 +115,7 @@ match_rule(Host, Rule, JID) ->
|
||||
end
|
||||
end.
|
||||
|
||||
match_acls([], _, Host) ->
|
||||
match_acls([], _, _Host) ->
|
||||
deny;
|
||||
match_acls([{Access, ACL} | ACLs], JID, Host) ->
|
||||
case match_acl(ACL, JID, Host) of
|
||||
@ -130,7 +130,7 @@ match_acl(ACL, JID, Host) ->
|
||||
all -> true;
|
||||
none -> false;
|
||||
_ ->
|
||||
{User, Server, Resource} = jlib:jid_tolower(JID),
|
||||
{User, Server, _Resource} = jlib:jid_tolower(JID),
|
||||
lists:any(fun(#acl{aclspec = Spec}) ->
|
||||
case Spec of
|
||||
all ->
|
||||
|
Loading…
Reference in New Issue
Block a user