steffen: server/perl-kolab/Kolab-Conf Conf.pm,1.39,1.40
cvs at intevation.de
cvs at intevation.de
Wed Sep 29 23:07:54 CEST 2004
Author: steffen
Update of /kolabrepository/server/perl-kolab/Kolab-Conf
In directory doto:/tmp/cvs-serv16766/Kolab-Conf
Modified Files:
Conf.pm
Log Message:
no need for group/resource specific transports
Index: Conf.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/Kolab-Conf/Conf.pm,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -d -r1.39 -r1.40
--- Conf.pm 21 Sep 2004 16:13:02 -0000 1.39
+++ Conf.pm 29 Sep 2004 21:07:52 -0000 1.40
@@ -249,41 +249,6 @@
Kolab::log('T', 'No Postfix transport map entries found');
}
- # Build transport rules for groups
- $mesg = $ldap->search( base => 'cn=groups,'.$Kolab::config{'base_dn'},
- scope => 'sub',
- filter => '(objectClass=kolabinetorgperson)' );
- if ($mesg->code) {
- Kolab::log('T', 'Unable to locate groups transport map entries in LDAP', KOLAB_ERROR);
- exit(1);
- }
- if ($mesg->code <= 0) {
- foreach $ldapobject ($mesg->entries) {
- my $mail = $ldapobject->get_value('mail');
- $mail = trim($mail);
- print $transport "$mail \tkolabgroup:localhost\n";
- }
- } else {
- Kolab::log('T', 'No Postfix transport map entries found');
- }
- # Build transport rules for resources
- $mesg = $ldap->search( base => 'cn=resources,'.$Kolab::config{'base_dn'},
- scope => 'sub',
- filter => '(objectClass=kolabinetorgperson)' );
- if ($mesg->code) {
- Kolab::log('T', 'Unable to locate resources transport map entries in LDAP', KOLAB_ERROR);
- exit(1);
- }
- if ($mesg->code <= 0) {
- foreach $ldapobject ($mesg->entries) {
- my $mail = $ldapobject->get_value('mail');
- $mail = trim($mail);
- print $transport "$mail \tkolabres:localhost\n";
- }
- } else {
- Kolab::log('T', 'No Postfix transport map entries found');
- }
-
Kolab::LDAP::destroy($ldap);
$transport->close;
More information about the commits
mailing list