steffen: server/perl-kolab/Kolab-LDAP LDAP.pm,1.34,1.35

cvs at intevation.de cvs at intevation.de
Thu Jul 14 23:39:51 CEST 2005


Author: steffen

Update of /kolabrepository/server/perl-kolab/Kolab-LDAP
In directory doto:/tmp/cvs-serv12581/Kolab-LDAP

Modified Files:
	LDAP.pm 
Log Message:
patch for Issue845 applied (groupOfNames cleanup handling)

Index: LDAP.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/Kolab-LDAP/LDAP.pm,v
retrieving revision 1.34
retrieving revision 1.35
diff -u -d -r1.34 -r1.35
--- LDAP.pm	8 Jul 2005 02:05:35 -0000	1.34
+++ LDAP.pm	14 Jul 2005 21:39:49 -0000	1.35
@@ -238,6 +238,9 @@
 
     Kolab::log('L', "Kolab::LDAP::createObject() called with obj uid field `$objuidfield' for obj type `$p'", KOLAB_DEBUG);
 
+    # No action for groups
+    return if( $objuidfield eq '' );
+
     my $kolabhomeserver = lc($object->get_value('kolabhomeserver'));
     my $islocal = 1;
     my $del = $object->get_value($Kolab::config{$p . '_field_deleted'}, asref => 1);
@@ -482,6 +485,7 @@
 
     syncBasic($cyrus, 'user', '(uid=*)', 0);
     syncBasic($cyrus, 'sf', '', 1);
+    syncBasic($cyrus, 'group', '', 0);
 
     # Check that all mailboxes correspond to LDAP objects
     Kolab::log('L', 'Synchronising mailboxes');





More information about the commits mailing list