shelldap
changeset 35 3e5572aeee55
parent 34 40c3719c87d4
child 36 2e78218b8045
equal deleted inserted replaced
34:40c3719c87d4 35:3e5572aeee55
  1511 			}
  1511 			}
  1512 		}
  1512 		}
  1513 
  1513 
  1514 		# if this entry is a container for other entries, append a
  1514 		# if this entry is a container for other entries, append a
  1515 		# trailing slash.
  1515 		# trailing slash.
  1516 		$dn .= '/'  if ($e->get_value('hasSubordinates') eq 'TRUE');
  1516 		$dn .= '/'  if $e->get_value('hasSubordinates') &&
       
  1517 			$e->get_value('hasSubordinates') eq 'TRUE';
  1517 
  1518 
  1518 		# additional arguments/attributes were given; show their values
  1519 		# additional arguments/attributes were given; show their values
  1519 		#
  1520 		#
  1520 		if ( scalar @args ) {
  1521 		if ( scalar @args ) {
  1521 			my @elements = ( $dn );
  1522 			my @elements = ( $dn );