diff options
author | Andy Dougherty <doughera@lafayette.edu> | 2004-06-24 11:09:47 -0400 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2004-06-25 22:19:51 +0000 |
commit | 98641f606c65e71cca89f9a694e2796b5a21cbd8 (patch) | |
tree | c9607b6ebb0eb995e8cec0160a98bb5ab6362acf /lib/PerlIO | |
parent | 429b060a3290b7ecf98534144fcaf0fb46b2afe3 (diff) | |
download | perl-98641f606c65e71cca89f9a694e2796b5a21cbd8.tar.gz |
Correct detection of absent modules. Based on
Subject: [PATCH] Config{extensions} uses filesystem names as extensions
Message-ID: <Pine.SOL.4.58.0406241505530.14039@maxwell.phys.lafayette.edu>
with improvements from Marcus Holland-Moritz
p4raw-id: //depot/perl@22998
Diffstat (limited to 'lib/PerlIO')
-rw-r--r-- | lib/PerlIO/via/t/QuotedPrint.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PerlIO/via/t/QuotedPrint.t b/lib/PerlIO/via/t/QuotedPrint.t index 4774af3f47..baf0d1f4e4 100644 --- a/lib/PerlIO/via/t/QuotedPrint.t +++ b/lib/PerlIO/via/t/QuotedPrint.t @@ -8,7 +8,7 @@ BEGIN { # Magic Perl CORE pragma exit 0; } require Config; - if (($Config::Config{'extensions'} !~ /\bPerlIO::via\b/) ){ + if (($Config::Config{'extensions'} !~ m!\bPerlIO/via\b!) ){ print "1..0 # Skip -- Perl configured without PerlIO::via module\n"; exit 0; } |