diff options
author | Endi S. Dewata <edewata@redhat.com> | 2010-10-05 16:31:20 -0400 |
---|---|---|
committer | Endi S. Dewata <edewata@redhat.com> | 2010-10-11 10:47:28 -0500 |
commit | 011103a0e7c70aebaa4e348d7cf9e62436ecbe7c (patch) | |
tree | 0495debcaa2ed3b410c1a0837c1ff7b8abbbc249 /ldap/admin/src/scripts/Migration.pm.in | |
parent | aa72ce4988e28733c958651894088197c8770ccf (diff) | |
download | ds-573889.tar.gz ds-573889.tar.xz ds-573889.zip |
WIP573889
Diffstat (limited to 'ldap/admin/src/scripts/Migration.pm.in')
-rw-r--r-- | ldap/admin/src/scripts/Migration.pm.in | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/ldap/admin/src/scripts/Migration.pm.in b/ldap/admin/src/scripts/Migration.pm.in index 66618c8b..23ed2d05 100644 --- a/ldap/admin/src/scripts/Migration.pm.in +++ b/ldap/admin/src/scripts/Migration.pm.in @@ -233,8 +233,17 @@ sub init { # get list of instances to migrate if (! @instances) { # an instance must be a directory called $oldsroot/slapd-something and the file - # $oldsroot/slapd-something/config/dse.ldif must exist - @instances = grep { -d && -f "$_/config/dse.ldif" && ($_ =~ s,$self->{oldsroot}/,,) } + # $oldsroot/slapd-something/dse.ldif must exist +print "oldsroot: $self->{oldsroot}\n"; +print "actualsroot: $self->{actualsroot}\n"; + +my $files = glob("$self->{oldsroot}/slapd-*"); +print "files: $files\n"; + +foreach $file (grep { -d && -f "$_/dse.ldif" } $files) { +print " - : $file\n"; +} + @instances = grep { -d && -f "$_/dse.ldif" && ($_ =~ s,$self->{oldsroot}/,,) } glob("$self->{oldsroot}/slapd-*"); } |