[PATCH 19/19] remove rdn_to_dn() after its last users are gone
From 892013debac0aef9937ecfbf2c8aab72c88e07cc Mon Sep 17 00:00:00 2001 Signed-off-by: Peter Marschall <peter@adpm.de> --- shelldap | 21 --------------------- 1 files changed, 0 insertions(+), 21 deletions(-) FossilOrigin-Name: 3f2282a675ea198aa016bb7c87344fad130a0e7c5797bbd5c0133194a2344c9f
This commit is contained in:
parent
886a1c9855
commit
38c021a71d
1 changed files with 0 additions and 21 deletions
21
shelldap
21
shelldap
|
|
@ -636,27 +636,6 @@ sub base
|
|||
return $self->{'base'};
|
||||
}
|
||||
|
||||
# make sure a given rdn includes the current
|
||||
# base, making it a dn.
|
||||
# accepts a string reference.
|
||||
#
|
||||
sub rdn_to_dn
|
||||
{
|
||||
my $self = shift;
|
||||
my $rdn = shift or return;
|
||||
|
||||
return unless ref $rdn;
|
||||
|
||||
# allow cd to 'basedn' and cd to directories 'higher' in the tree
|
||||
return if $$rdn =~ /$conf->{'basedn'}$/;
|
||||
|
||||
# auto fill in current base for deeper DNs
|
||||
my ( $dn, $curbase ) = ( $$rdn, $self->base() );
|
||||
$dn = "$$rdn," . $curbase unless $$rdn =~ /$curbase/i;
|
||||
|
||||
$$rdn = $dn;
|
||||
}
|
||||
|
||||
# do a search on a dn to determine if it is valid.
|
||||
# returns a bool.
|
||||
#
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue