Upgrade to constant-1.15

p4raw-id: //depot/perl@32800

diff --git a/lib/constant.pm b/lib/constant.pm
index cc3ee98..2c83553 100644 (file)
--- a/lib/constant.pm
+++ b/lib/constant.pm
@@ -4,7 +4,7 @@ use strict;
 use warnings::register;
 
 use vars qw($VERSION %declared);
-$VERSION = '1.13';
+$VERSION = '1.15';
 
 #=======================================================================
 

diff --git a/lib/constant.t b/lib/constant.t
index 01b7c00..3f146c6 100644 (file)
--- a/lib/constant.t
+++ b/lib/constant.t
@@ -305,7 +305,7 @@ sub zit;
     eval 'use constant zit => 4; 1' or die $@;
 
     # empty prototypes are reported differently in different versions
-    my $no_proto = $] < 5.008 ? "" : ": none";
+    my $no_proto = $] < 5.008004 ? "" : ": none";
 
     is(scalar @warnings, 1, "1 warning");
     like ($warnings[0], qr/^Prototype mismatch: sub main::zit$no_proto vs \(\)/,