small style cleanup

FossilOrigin-Name: a99cff86f791ee70c08809c59cf65314b6c10c860245f9d20de00638acf6a5bd
This commit is contained in:
Mahlon E. Smith 2011-09-06 22:59:10 +00:00
parent 22128dac8b
commit 2ec8004a72

View file

@ -624,9 +624,9 @@ sub base
$conf->{'basedn'} = $namingContexts[0];
$self->{'base'} = $namingContexts[0];
}
if ( @_ ) {
if ( $_[0] ) {
my $base = canonical_dn( $_[0], casefold => 'none' );
$self->{'base'} = $base if ($base);
$self->{'base'} = $base if $base;
}
return $self->{'base'};
}