steffen: server/perl-kolab/Kolab-Conf Conf.pm.in,1.4,1.5

[cvs at intevation.de]

Author: steffen

Update of /kolabrepository/server/perl-kolab/Kolab-Conf
In directory doto:/tmp/cvs-serv23246/Kolab-Conf

Modified Files:
	Conf.pm.in 
Log Message:
Fix for issue1092 (performance issue creating virtual etc. tables)

Index: Conf.pm.in
===================================================================
RCS file: /kolabrepository/server/perl-kolab/Kolab-Conf/Conf.pm.in,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- Conf.pm.in	15 Jan 2006 13:59:05 -0000	1.4
+++ Conf.pm.in	22 Feb 2006 21:28:42 -0000	1.5
@@ -381,8 +381,8 @@
     );
 
     my $mesg = $ldap->search(
-        base    => $Kolab::config{'base_dn'},
-        scope   => 'sub',
+        base    => 'k=kolab,'.$Kolab::config{'base_dn'},
+        scope   => 'base',
         filter  => '(objectclass=*)'
     );
     if ($mesg->code) {
@@ -552,7 +552,7 @@
             foreach (@$userlist) {
 	      my $uid = $_;
 	      my $umesg = $ldap->search( base => $uid,
-					 scope => 'exact', 
+					 scope => 'base', 
 					 filter => '(objectClass=*)' );
 	      if ( $umesg && $umesg->code() <= 0 && $umesg->count() == 1 ) {
 		my $mail;