# HG changeset patch
# User Peter Marschall <peter@adpm.de>
# Date 1299353047 -3600
# Node ID 77fd303f1a28b0fb7a030f4fc066d67fc7f34d7b
# Parent  3a8ae911798158212481235c692d2f404c124809
remove now unused parent_dn() method

diff -r 3a8ae9117981 -r 77fd303f1a28 shelldap
--- 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.
 #