steffen: server/perl-kolab/Kolab-LDAP LDAP.pm.in,1.1,1.2

[cvs at intevation.de]

Author: steffen

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

Modified Files:
	LDAP.pm.in 
Log Message:
fix for warning in issue1068

Index: LDAP.pm.in
===================================================================
RCS file: /kolabrepository/server/perl-kolab/Kolab-LDAP/LDAP.pm.in,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- LDAP.pm.in	17 Dec 2005 21:45:32 -0000	1.1
+++ LDAP.pm.in	28 Feb 2006 14:39:07 -0000	1.2
@@ -319,7 +319,7 @@
 	      # Deal with group and resource accounts
 	      my $edn = Net::LDAP::Util::ldap_explode_dn($object->dn(), casefold=>'lower' );
 	      my $gcn = $edn->[1]->{'cn'};
-	      if( $gcn eq 'groups' || $gcn eq 'resources' ) {
+	      if( $gcn && ($gcn eq 'groups' || $gcn eq 'resources') ) {
 		# We need to give the calendar user access to 
 		# the groups/resources folder.
 		# TODO: Don't hardcode username