summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorZefram <zefram@fysh.org>2012-02-02 16:35:34 +0000
committerZefram <zefram@fysh.org>2012-02-02 16:35:34 +0000
commit2f87dc78b46ac873c55e9ee018a5dc4905389506 (patch)
treeba325e23c3ac0dc0578b6b6735f308748d3b634c
parent879b0cab8575cdc155c45c42eb82075648761936 (diff)
downloadperl-2f87dc78b46ac873c55e9ee018a5dc4905389506.tar.gz
synch Carp::Heavy version number to Carp
Also add a test to make sure it stays synched.
-rw-r--r--dist/Carp/lib/Carp/Heavy.pm2
-rw-r--r--dist/Carp/t/heavy.t6
2 files changed, 6 insertions, 2 deletions
diff --git a/dist/Carp/lib/Carp/Heavy.pm b/dist/Carp/lib/Carp/Heavy.pm
index 97ed291775..8094e857e3 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 f890d6c28f..72e46330b4 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;