--- a/shelldap	Sat Mar 05 20:19:18 2011 +0100
+++ b/shelldap	Sat Mar 05 20:24:07 2011 +0100
@@ -748,22 +748,6 @@
 	return;
 }
 
-# parse parent ('..') cn requests
-#
-sub parent_dn 
-{
-	my $self = shift;	
-	my $rdn  = shift or return;
-	return unless ref $rdn;
-
-	# FIXME: 'cd ../ou=somewhere' should work
-	my $dn = $self->base();
-	my $dotcount = $$rdn =~ s/\.\./\.\./g;
-	$dn =~ s/^.*?,// for 1 .. $dotcount;
-
-	$$rdn = $dn;
-}
-
 # given an array ref of shell-like globs, 
 # make and return an LDAP filter object.
 #