shelldap
changeset 32 95dbffcc757b
parent 31 a3a710f720dd
child 33 057fefab56b0
--- a/shelldap	Sun Mar 06 20:31:05 2011 +0100
+++ b/shelldap	Sun Mar 06 20:51:08 2011 +0100
@@ -636,27 +636,6 @@
 	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.
 #