# non-absolute INC, don't do that.
use FindBin;
use if (-d $FindBin::Bin.'/../.git/' && $INC[0] =~ m#^/#),
- lib => $FindBin::Bin.'/../';
+ lib => $FindBin::Bin.'/../lib/';
use Debbugs::DB;
use Debbugs::DB::Util qw(prepare_execute);
# non-absolute INC, don't do that.
use FindBin;
use if (-d $FindBin::Bin.'/../.git/' && $INC[0] =~ m#^/#),
- lib => $FindBin::Bin.'/../';
+ lib => $FindBin::Bin.'/../lib';
use Debbugs::Common (qw(checkpid lockpid get_hashname getparsedaddrs),
qw(getbugcomponent make_list getsourcemaintainers),
if ($INC[0] !~ /^\//) {
}
}
-use if defined $debbugs_dir, lib => $debbugs_dir;
+use if defined $debbugs_dir, lib => $debbugs_dir.'/lib/';
use Debbugs::Config qw(:globals :text :config);
if ($INC[0] !~ /^\//) {
}
}
-use if defined $debbugs_dir, lib => $debbugs_dir;
+use if defined $debbugs_dir, lib => $debbugs_dir.'/lib/';
use Debbugs::Config qw(:config);
use Debbugs::CGI qw(cgi_parameters);
if ($INC[0] !~ /^\//) {
}
}
-use if defined $debbugs_dir, lib => $debbugs_dir;
+use if defined $debbugs_dir, lib => $debbugs_dir.'/lib/';
use Debbugs::Config qw(:globals :text :config);
use CGI::Simple;
undef $debbugs_dir;
}
}
-use if defined $debbugs_dir, lib => $debbugs_dir;
+use if defined $debbugs_dir, lib => $debbugs_dir.'/lib/';
binmode(STDOUT,':encoding(UTF-8)');
use POSIX qw(strftime nice);
if ($INC[0] !~ /^\//) {
}
}
-use if defined $debbugs_dir, lib => $debbugs_dir;
+use if defined $debbugs_dir, lib => $debbugs_dir.'/lib/';
use CGI::Simple;
if ($INC[0] !~ /^\//) {
}
}
-use if defined $debbugs_dir, lib => $debbugs_dir;
+use if defined $debbugs_dir, lib => $debbugs_dir.'/lib/';
#use SOAP::Transport::HTTP;
if ($INC[0] !~ /^\//) {
}
}
-use if defined $debbugs_dir, lib => $debbugs_dir;
+use if defined $debbugs_dir, lib => $debbugs_dir.'/lib/';
use CGI::Simple;