summaryrefslogtreecommitdiffstats
path: root/migrate.pl
diff options
context:
space:
mode:
Diffstat (limited to 'migrate.pl')
-rwxr-xr-xmigrate.pl11
1 files changed, 9 insertions, 2 deletions
diff --git a/migrate.pl b/migrate.pl
index 907e0cab5..0c67df42f 100755
--- a/migrate.pl
+++ b/migrate.pl
@@ -11,8 +11,15 @@ use strict;
use warnings;
use File::Basename;
-BEGIN { chdir dirname($0); }
-use lib qw(. lib local/lib/perl5);
+use File::Spec;
+BEGIN {
+ require lib;
+ my $dir = File::Spec->rel2abs(dirname(__FILE__));
+ my $base = File::Spec->catdir($dir);
+ lib->import($base, File::Spec->catdir($base, "lib"), File::Spec->catdir($base, qw(local lib perl5)));
+ chdir $base;
+}
+
use Bugzilla;
use Bugzilla::Migrate;