Chapril/xmpp.chapril.org-ejabberd
25
1
Fork 0
mirror of https://github.com/processone/ejabberd.git synced 2024-11-22 16:20:52 +01:00
Code Releases Activity

* src/acl.erl: Remove compilation warnings (EJAB-290).

Browse Source 
SVN Revision: 840
This commit is contained in:
Mickaël Rémond 2007-07-30 11:06:50 +00:00
parent e9bbed2299
commit bf6e5a0d26
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ChangeLog
View File

@ -1,5 +1,7 @@
2007-07-30 Mickael Remond <mickael.remond@process-one.net> 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 * src/xml_stream.erl: Group CDATA on a single xmlcdata
node (splitting is not relevant as dependant on TCP/IP packet node (splitting is not relevant as dependant on TCP/IP packet
fragmentation) (EJAB-292). fragmentation) (EJAB-292).

4
src/acl.erl
View File

@ -115,7 +115,7 @@ match_rule(Host, Rule, JID) ->
end end
end. end.
match_acls([], _, Host) -> match_acls([], _, _Host) ->
deny; deny;
match_acls([{Access, ACL} | ACLs], JID, Host) -> match_acls([{Access, ACL} | ACLs], JID, Host) ->
case match_acl(ACL, JID, Host) of case match_acl(ACL, JID, Host) of
@ -130,7 +130,7 @@ match_acl(ACL, JID, Host) ->
all -> true; all -> true;
none -> false; none -> false;
_ -> _ ->
{User, Server, Resource} = jlib:jid_tolower(JID), {User, Server, _Resource} = jlib:jid_tolower(JID),
lists:any(fun(#acl{aclspec = Spec}) -> lists:any(fun(#acl{aclspec = Spec}) ->
case Spec of case Spec of
all -> all ->