diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-09-20 08:59:34 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-09-20 08:59:34 +0000 |
| commit | 48e1361cf2222b49db181701bdd28356903d46d7 (patch) | |
| tree | 2e8ded84898b08d6ab71252b7e997837506ed12f /lib/CPANPLUS/t | |
| parent | d3ba3f5c3251cdefafd2e9fe0bb52ce4419c7624 (diff) | |
| download | perl-48e1361cf2222b49db181701bdd28356903d46d7.tar.gz | |
Don't use ~0 as a version number -- it could overflow.
p4raw-id: //depot/perl@31920
Diffstat (limited to 'lib/CPANPLUS/t')
| -rw-r--r-- | lib/CPANPLUS/t/40_CPANPLUS-Internals-Report.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/CPANPLUS/t/40_CPANPLUS-Internals-Report.t b/lib/CPANPLUS/t/40_CPANPLUS-Internals-Report.t index b028404085..67730a79bf 100644 --- a/lib/CPANPLUS/t/40_CPANPLUS-Internals-Report.t +++ b/lib/CPANPLUS/t/40_CPANPLUS-Internals-Report.t @@ -104,7 +104,7 @@ my $map = { pre_hook => sub { my $mod = shift; my $clone = $mod->clone; - $clone->status->prereqs( { $ModPrereq => ~0 } ); + $clone->status->prereqs( { $ModPrereq => ~0/2 } ); return $clone; }, failed => 1, @@ -273,7 +273,7 @@ my $map = { } { my $clone = $Mod->clone; - my $prereqs = { $ModPrereq => ~0 }; + my $prereqs = { $ModPrereq => ~0/2 }; $clone->status->prereqs( $prereqs ); |