gunnar: server/perl-kolab/lib/Kolab LDAP.pm,1.16,1.17

[cvs at kolab.org]

Author: gunnar

Update of /kolabrepository/server/perl-kolab/lib/Kolab
In directory doto:/tmp/cvs-serv2925/perl-kolab/lib/Kolab

Modified Files:
	LDAP.pm 
Log Message:
MFB: kolab/issue1448 (Users might add an account on the nonHome Server and write emails in there.)

Index: LDAP.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/lib/Kolab/LDAP.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- LDAP.pm	16 Dec 2009 16:08:55 -0000	1.16
+++ LDAP.pm	5 Jan 2010 18:26:39 -0000	1.17
@@ -548,7 +548,7 @@
             }
             if( $p ne 'sf' && !$islocal ) {
                 # Hide user mailboxes on other servers
-                Kolab::Cyrus::setACL($cyrus,$uid,0, ["$uid rswipcda"]);
+                Kolab::Cyrus::setACL($cyrus,$uid,0, ["$uid rs"]);
             } elsif( $p ne 'sf' ) {
                 # Deal with group and resource accounts
                 my $edn = Net::LDAP::Util::ldap_explode_dn($object->dn(), casefold=>'lower' );