This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
4fa8e15
)
lib/version.t: suppress warning
author
Father Chrysostomos
<sprout@cpan.org>
Thu, 24 Nov 2011 04:40:06 +0000
(20:40 -0800)
committer
Father Chrysostomos
<sprout@cpan.org>
Thu, 24 Nov 2011 09:45:31 +0000
(
01:45
-0800)
lib/version.t
patch
|
blob
|
blame
|
history
diff --git
a/lib/version.t
b/lib/version.t
index
ce46fa2
..
a92a2ad
100644
(file)
--- a/
lib/version.t
+++ b/
lib/version.t
@@
-330,7
+330,7
@@
sub BaseTests {
diag "test with version class names" unless $ENV{PERL_CORE};
$version = $CLASS->$method("v1.2.3");
diag "test with version class names" unless $ENV{PERL_CORE};
$version = $CLASS->$method("v1.2.3");
- eval { $version < $CLASS };
+ eval {
() =
$version < $CLASS };
like $@, qr/^Invalid version format/, "error with $version < $CLASS";
# that which is not expressly permitted is forbidden
like $@, qr/^Invalid version format/, "error with $version < $CLASS";
# that which is not expressly permitted is forbidden