equal
deleted
inserted
replaced
622 unless ( $self->{'base'} ) { |
622 unless ( $self->{'base'} ) { |
623 my @namingContexts = $self->{'root_dse'}->get_value('namingContexts'); |
623 my @namingContexts = $self->{'root_dse'}->get_value('namingContexts'); |
624 $conf->{'basedn'} = $namingContexts[0]; |
624 $conf->{'basedn'} = $namingContexts[0]; |
625 $self->{'base'} = $namingContexts[0]; |
625 $self->{'base'} = $namingContexts[0]; |
626 } |
626 } |
627 if ( @_ ) { |
627 if ( $_[0] ) { |
628 my $base = canonical_dn($_[0], casefold => 'none'); |
628 my $base = canonical_dn( $_[0], casefold => 'none' ); |
629 $self->{'base'} = $base if ($base); |
629 $self->{'base'} = $base if $base; |
630 } |
630 } |
631 return $self->{'base'}; |
631 return $self->{'base'}; |
632 } |
632 } |
633 |
633 |
634 # make sure a given rdn includes the current |
634 # make sure a given rdn includes the current |