diff options
| -rw-r--r-- | ChangeLog | 2 | ||||
| -rw-r--r-- | src/acl.erl | 4 |
2 files changed, 4 insertions, 2 deletions
@@ -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). diff --git a/src/acl.erl b/src/acl.erl index a4417a59d..61853ea08 100644 --- a/src/acl.erl +++ b/src/acl.erl @@ -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 -> |