use FindBin module to resolve the relative lib path.
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8388 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
61d7f8402e
commit
f159080112
@ -5,8 +5,6 @@ BEGIN
|
||||
}
|
||||
use lib "$::XCATROOT/lib/perl";
|
||||
|
||||
use lib "../imgutils";
|
||||
|
||||
use File::Basename;
|
||||
use File::Path;
|
||||
use File::Copy;
|
||||
@ -14,6 +12,8 @@ use File::Find;
|
||||
use Getopt::Long;
|
||||
use Cwd qw(realpath);
|
||||
|
||||
use FindBin;
|
||||
use lib "$FindBin::Bin/../imgutils";
|
||||
use imgutils;
|
||||
|
||||
#use strict;
|
||||
|
@ -5,8 +5,6 @@ BEGIN
|
||||
}
|
||||
use lib "$::XCATROOT/lib/perl";
|
||||
|
||||
use lib "../imgutils";
|
||||
|
||||
use File::Basename;
|
||||
use File::Path;
|
||||
use File::Copy qw/copy cp mv move/;
|
||||
@ -15,6 +13,8 @@ use Getopt::Long;
|
||||
use Cwd qw(realpath);
|
||||
use File::Temp qw/mkdtemp/;
|
||||
|
||||
use FindBin;
|
||||
use lib "$FindBin::Bin/../imgutils";
|
||||
use imgutils;
|
||||
|
||||
#use strict;
|
||||
|
@ -5,8 +5,6 @@ BEGIN
|
||||
}
|
||||
use lib "$::XCATROOT/lib/perl";
|
||||
|
||||
use lib "../imgutils";
|
||||
|
||||
use File::Basename;
|
||||
use File::Path;
|
||||
use File::Copy qw/copy cp mv move/;
|
||||
@ -15,6 +13,8 @@ use Getopt::Long;
|
||||
use Cwd qw(realpath);
|
||||
use File::Temp qw/mkdtemp/;
|
||||
|
||||
use FindBin;
|
||||
use lib "$FindBin::Bin/../imgutils";
|
||||
use imgutils;
|
||||
|
||||
#use strict;
|
||||
|
Loading…
Reference in New Issue
Block a user