Browse Source

More stuff

master
freesource 22 years ago
parent
commit
a7af2cf254
  1. 3
      expect_uml
  2. 3
      gbootroot
  3. 2
      yard_chrooted_tests

3
expect_uml

@ -29,12 +29,11 @@ BEGIN {
my $fhs = grep(/\/usr\/share\/perl5/,@INC); my $fhs = grep(/\/usr\/share\/perl5/,@INC);
unshift(@INC,"."); # better make sure we mean . when we mean .
if ($fhs == 0) { if ($fhs == 0) {
unshift(@INC,"/usr/share/perl5"); unshift(@INC,"/usr/share/perl5");
} }
unshift(@INC,"."); # better make sure we mean . when we mean .
my $sbin = grep(/\/sbin/,$ENV{'PATH'}); my $sbin = grep(/\/sbin/,$ENV{'PATH'});
if ($sbin == 0) { if ($sbin == 0) {

3
gbootroot

@ -220,12 +220,11 @@ BEGIN {
my $fhs = grep(/\/usr\/share\/perl5/,@INC); my $fhs = grep(/\/usr\/share\/perl5/,@INC);
unshift(@INC,"."); # better make sure we mean . when we mean .
if ($fhs == 0) { if ($fhs == 0) {
unshift(@INC,"/usr/share/perl5"); unshift(@INC,"/usr/share/perl5");
} }
unshift(@INC,"."); # better make sure we mean . when we mean .
my $sbin = grep(/\/sbin/,$ENV{'PATH'}); my $sbin = grep(/\/sbin/,$ENV{'PATH'});
if ($sbin == 0) { if ($sbin == 0) {

2
yard_chrooted_tests

@ -36,12 +36,12 @@ BEGIN {
my $fhs = grep(/\/usr\/share\/perl5/,@INC); my $fhs = grep(/\/usr\/share\/perl5/,@INC);
unshift(@INC,"."); # better make sure we mean . when we mean .
if ($fhs == 0) { if ($fhs == 0) {
unshift(@INC,"/usr/share/perl5"); unshift(@INC,"/usr/share/perl5");
} }
unshift(@INC,"."); # better make sure we mean . when we mean .
my $sbin = grep(/\/sbin/,$ENV{'PATH'}); my $sbin = grep(/\/sbin/,$ENV{'PATH'});
if ($sbin == 0) { if ($sbin == 0) {

Loading…
Cancel
Save