diff options
author | Zefram <zefram@fysh.org> | 2012-02-02 16:35:34 +0000 |
---|---|---|
committer | Zefram <zefram@fysh.org> | 2012-02-02 16:35:34 +0000 |
commit | 2f87dc78b46ac873c55e9ee018a5dc4905389506 (patch) | |
tree | ba325e23c3ac0dc0578b6b6735f308748d3b634c | |
parent | 879b0cab8575cdc155c45c42eb82075648761936 (diff) | |
download | perl-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.pm | 2 | ||||
-rw-r--r-- | dist/Carp/t/heavy.t | 6 |
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; |