diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-09-08 08:41:38 +0200 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-09-08 11:27:21 +0200 |
commit | 7b903762ad0ebd5d0459692ad5c081c69a3c0808 (patch) | |
tree | 6e64cf76feca7527bf3a0b2ab962572023e5887e /lib/FindBin.t | |
parent | a34ce875bf70f00f7af4a549f8c1ff0f4469f7fb (diff) | |
download | perl-7b903762ad0ebd5d0459692ad5c081c69a3c0808.tar.gz |
Remove code specific to MacOS Classic from core tests
Diffstat (limited to 'lib/FindBin.t')
-rw-r--r-- | lib/FindBin.t | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lib/FindBin.t b/lib/FindBin.t index be6f58c3e0..36e142c476 100644 --- a/lib/FindBin.t +++ b/lib/FindBin.t @@ -10,12 +10,7 @@ print "1..2\n"; use FindBin qw($Bin); print "# $Bin\n"; - -if ($^O eq 'MacOS') { - print "not " unless $Bin =~ m,:lib:$,; -} else { - print "not " unless $Bin =~ m,[/.]lib\]?$,; -} +print "not " unless $Bin =~ m,[/.]lib\]?$,; print "ok 1\n"; $0 = "-"; |