From: Zefram Date: Thu, 2 Feb 2012 16:35:34 +0000 (+0000) Subject: synch Carp::Heavy version number to Carp X-Git-Tag: accepted/trunk/20130322.191538~851 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=2f87dc78b46ac873c55e9ee018a5dc4905389506;p=platform%2Fupstream%2Fperl.git synch Carp::Heavy version number to Carp Also add a test to make sure it stays synched. --- diff --git a/dist/Carp/lib/Carp/Heavy.pm b/dist/Carp/lib/Carp/Heavy.pm index 97ed291..8094e85 100644 --- a/dist/Carp/lib/Carp/Heavy.pm +++ b/dist/Carp/lib/Carp/Heavy.pm @@ -2,7 +2,7 @@ package Carp::Heavy; use Carp (); -our $VERSION = '1.23'; +our $VERSION = '1.25'; 1; diff --git a/dist/Carp/t/heavy.t b/dist/Carp/t/heavy.t index f890d6c..72e4633 100644 --- a/dist/Carp/t/heavy.t +++ b/dist/Carp/t/heavy.t @@ -1,7 +1,11 @@ -print "1..2\n"; +print "1..3\n"; print defined(&Carp::carp) ? "not " : "", "ok 1 # control\n"; require Carp::Heavy; print defined(&Carp::carp) ? "" : "not ", "ok 2 # carp loaded by Carp::Heavy\n"; +eval q{ + print $Carp::Heavy::VERSION eq $Carp::VERSION ? "" : "not ", + "ok 3 # version numbers match\n"; +}; 1;