summaryrefslogtreecommitdiff
path: root/lib/lib.t
diff options
context:
space:
mode:
Diffstat (limited to 'lib/lib.t')
-rw-r--r--lib/lib.t10
1 files changed, 0 insertions, 10 deletions
diff --git a/lib/lib.t b/lib/lib.t
index 5d4ff3a341..d39a656bf8 100644
--- a/lib/lib.t
+++ b/lib/lib.t
@@ -52,13 +52,6 @@ use lib $Lib_Dir;
BEGIN { use_ok('Yup') }
BEGIN {
- if ($^O eq 'MacOS') {
- for ($Lib_Dir, $Arch_Dir) {
- tr|/|:|;
- $_ .= ":" unless /:$/;
- $_ = ":$_" unless /^:/; # we know this path is relative
- }
- }
is( $INC[1], $Lib_Dir, 'lib adding at end of @INC' );
print "# \@INC == @INC\n";
is( $INC[0], $Arch_Dir, ' auto/ dir in front of that' );
@@ -67,9 +60,6 @@ BEGIN {
# Yes, %INC uses Unixy filepaths.
# Not on Mac OS, it doesn't ... it never has, at least.
my $path = join("/",$Lib_Dir, 'Yup.pm');
- if ($^O eq 'MacOS') {
- $path = $Lib_Dir . 'Yup.pm';
- }
is( $INC{'Yup.pm'}, $path, '%INC set properly' );
is( eval { do 'Yup.pm' }, 42, 'do() works' );