From b35c5fa1ef4ed5bc851a2c97d645858aa9d0f736 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Sat, 4 Nov 2000 22:56:21 +0000 Subject: [PATCH] Test tweak ($Config{useperlio} is by default undef) . p4raw-id: //depot/perl@7548 --- t/lib/b.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/lib/b.t b/t/lib/b.t index fca7f47..2bca033 100755 --- a/t/lib/b.t +++ b/t/lib/b.t @@ -126,7 +126,7 @@ ok; chomp($a = `$^X "-I../lib" "-MB::Stash" "-Mwarnings" -e1`); $a = join ',', sort split /,/, $a; -$a =~ s/-uperlio(?:::\w+)?,//g if $Config{'useperlio'} eq 'define'; +$a =~ s/-uperlio(?:::\w+)?,//g if defined $Config{'useperlio'} and $Config{'useperlio'} eq 'define'; $a =~ s/-uWin32,// if $^O eq 'MSWin32'; $a =~ s/-u(Cwd|File|File::Copy|OS2),//g if $^O eq 'os2'; $a =~ s/-uCwd,// if $^O eq 'cygwin'; -- 2.7.4