diff options
| author | Vincent Pit <perl@profvince.com> | 2009-08-20 10:26:59 +0200 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2009-08-22 19:48:47 +0100 |
| commit | 52adc852cf281e94718e48b98ad6f8ab856cc262 (patch) | |
| tree | 9681bb0321ad78222a89dbcba35d90006d2fa6dd | |
| parent | 48ae1f6e140871497ec9438fc2417545b518c8ef (diff) | |
| download | perl-52adc852cf281e94718e48b98ad6f8ab856cc262.tar.gz | |
Teach perlivp about the new stucture of the IO::Compress module suite
This fixes [perl #68682] : 5.10.1 ( RC1 and RC2 ) perlivp fails IO/Compress
(cherry picked from commit e7598a06d704c8e12489be3a9098367ae55f5a89)
| -rw-r--r-- | utils/perlivp.PL | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/utils/perlivp.PL b/utils/perlivp.PL index a862ceec47..762b4b3872 100644 --- a/utils/perlivp.PL +++ b/utils/perlivp.PL @@ -208,12 +208,12 @@ if (defined($Config{'extensions'})) { next if ($_ eq 'threads'); next if ($_ eq 'threads/shared'); } - # that's a distribution name, not a module name - next if /^IO_Compress_(?:Zlib|Base)$/; + # that's a distribution name, not a module name + next if $_ eq 'IO/Compress'; next if $_ eq 'Devel/DProf'; - # test modules - next if $_ eq 'XS/APItest'; - next if $_ eq 'XS/Typemap'; + # test modules + next if $_ eq 'XS/APItest'; + next if $_ eq 'XS/Typemap'; # VMS$ perl -e "eval ""require \""Devel/DProf.pm\"";"" print $@" # \NT> perl -e "eval \"require 'Devel/DProf.pm'\"; print $@" # DProf: run perl with -d to use DProf. |