summaryrefslogtreecommitdiffstats
path: root/ldap/admin/src/scripts/Migration.pm.in
diff options
context:
space:
mode:
Diffstat (limited to 'ldap/admin/src/scripts/Migration.pm.in')
-rw-r--r--ldap/admin/src/scripts/Migration.pm.in13
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-*");
}