package versions are now set via dzil

hermanhobnob · Oct 3, 2011 · c0f1d38 · c0f1d38
1 parent 5906fef
commit c0f1d38
Show file tree

Hide file tree

Showing 39 changed files with 7 additions and 86 deletions.
diff --git a/bin/cover b/bin/cover
@@ -12,8 +12,6 @@ require 5.6.1;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 
 use Config;
@@ -178,7 +176,7 @@ sub main
         push @{$Options->{annotations}}, $ann;
     }
 
-    print "$0 version $VERSION\n" and exit 0 if $Options->{version};
+    print "$0 version ".__PACKAGE__->VERSION."\n" and exit 0 if $Options->{version};
     pod2usage(-exitval => 0, -verbose => 1)  if $Options->{help};
     pod2usage(-exitval => 0, -verbose => 2)  if $Options->{info};
 

diff --git a/bin/cpancover b/bin/cpancover
@@ -12,8 +12,6 @@ require 5.6.1;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 
 use Cwd ();
@@ -56,7 +54,7 @@ sub get_options
                    version|v!
                  ));
 
-    print "$0 version $VERSION\n" and exit 0 if $Options->{version};
+    print "$0 version ".__PACKAGE__->VERSION."\n" and exit 0 if $Options->{version};
     pod2usage(-exitval => 0, -verbose => 0)  if $Options->{help};
     pod2usage(-exitval => 0, -verbose => 2)  if $Options->{info};
 
@@ -356,8 +354,6 @@ package Devel::Cover::Cpancover::Template::Provider;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Template::Provider";
 
 my %Templates;

diff --git a/bin/gcov2perl b/bin/gcov2perl
@@ -12,8 +12,6 @@ require 5.6.1;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 
 use File::Path;
@@ -38,7 +36,7 @@ sub get_options
                    merge!
                    version|v!
                  ));
-    print "$0 version $VERSION\n" and exit 0 if $Options->{version};
+    print "$0 version ".__PACKAGE__->VERSION."\n" and exit 0 if $Options->{version};
     pod2usage(-exitval => 0, -verbose => 0)  if $Options->{help};
     pod2usage(-exitval => 0, -verbose => 2)  if $Options->{info};
 }

diff --git a/dist.ini b/dist.ini
@@ -11,6 +11,7 @@ include_dotfiles = 1
 ;[PruneCruft    ]
 [ManifestSkip  ] ; removes gathered files that match anything in MANIFEST.SKIP
 [ExecDir] ; marks bin as the dir to contain scripts
+[PkgVersion] ; adds versions to the packages
 ;[MetaYAML      ] ; builds META.yaml
 ;[MetaJSON      ] ; builds META.json
 ;[License       ]

diff --git a/lib/Devel/Cover.pm b/lib/Devel/Cover.pm
@@ -10,8 +10,6 @@ package Devel::Cover;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use DynaLoader ();
 our @ISA = "DynaLoader";
 
@@ -114,7 +112,7 @@ BEGIN
         qr/(?:reader|writer|constructor|destructor|accessor|predicate) /;
 }
 
-sub version { $VERSION }
+sub version { __PACKAGE__->VERSION }
 
 if (0 && $Config{useithreads})
 {
@@ -200,7 +198,7 @@ EOM
         @coverage = get_coverage();
         my $last = pop @coverage || "";
 
-        print OUT __PACKAGE__, " $VERSION: Collecting coverage data for ",
+        print OUT __PACKAGE__, " ".__PACKAGE__->VERSION.": Collecting coverage data for ",
               join(", ", @coverage),
               @coverage ? " and " : "",
               "$last.\n",
@@ -315,7 +313,7 @@ sub import
     @Ignore_re = map qr/$_/,                           @Ignore;
     @Inc_re    = map $ci ? qr/^\Q$_\//i : qr/^\Q$_\//, @Inc;
 
-    bootstrap Devel::Cover $VERSION;
+    bootstrap Devel::Cover __PACKAGE__->VERSION;
 
     if (defined $Dir)
     {

diff --git a/lib/Devel/Cover/Annotation/Git.pm b/lib/Devel/Cover/Annotation/Git.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Annotation::Git;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Getopt::Long;
 
 sub new

diff --git a/lib/Devel/Cover/Annotation/Random.pm b/lib/Devel/Cover/Annotation/Random.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Annotation::Random;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Getopt::Long;
 
 sub new

diff --git a/lib/Devel/Cover/Annotation/Svk.pm b/lib/Devel/Cover/Annotation/Svk.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Annotation::Svk;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Getopt::Long;
 use Digest::MD5;
 

diff --git a/lib/Devel/Cover/Branch.pm b/lib/Devel/Cover/Branch.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Branch;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Criterion";
 
 sub pad         { my $self = shift; $self->[0] = [0, 0]

diff --git a/lib/Devel/Cover/Condition.pm b/lib/Devel/Cover/Condition.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Condition;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Branch";
 
 sub pad         { $_[0][0][$_] ||= 0 for 0 .. $_[0]->count - 1 }

diff --git a/lib/Devel/Cover/Condition_and_2.pm b/lib/Devel/Cover/Condition_and_2.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Condition_and_2;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Condition";
 
 sub count   { 2 }

diff --git a/lib/Devel/Cover/Condition_and_3.pm b/lib/Devel/Cover/Condition_and_3.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Condition_and_3;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Condition";
 
 sub count   { 3 }

diff --git a/lib/Devel/Cover/Condition_or_2.pm b/lib/Devel/Cover/Condition_or_2.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Condition_or_2;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Condition";
 
 sub count   { 2 }

diff --git a/lib/Devel/Cover/Condition_or_3.pm b/lib/Devel/Cover/Condition_or_3.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Condition_or_3;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Condition";
 
 sub count   { 3 }

diff --git a/lib/Devel/Cover/Condition_xor_4.pm b/lib/Devel/Cover/Condition_xor_4.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Condition_xor_4;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Condition";
 
 sub count   { 4 }

diff --git a/lib/Devel/Cover/Criterion.pm b/lib/Devel/Cover/Criterion.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Criterion;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::Statement       0.79;
 use Devel::Cover::Branch          0.79;
 use Devel::Cover::Condition       0.79;

diff --git a/lib/Devel/Cover/DB.pm b/lib/Devel/Cover/DB.pm
@@ -10,8 +10,6 @@ package Devel::Cover::DB;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::Criterion     0.79;
 use Devel::Cover::DB::File      0.79;
 use Devel::Cover::DB::Structure 0.79;

diff --git a/lib/Devel/Cover/DB/Digests.pm b/lib/Devel/Cover/DB/Digests.pm
@@ -10,8 +10,6 @@ package Devel::Cover::DB::Digests;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB::Structure 0.79;
 use Devel::Cover::DB::IO        0.79;
 

diff --git a/lib/Devel/Cover/DB/File.pm b/lib/Devel/Cover/DB/File.pm
@@ -10,8 +10,6 @@ package Devel::Cover::DB::File;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::Criterion 0.79;
 
 use Data::Dumper; $Data::Dumper::Indent = 1; $Data::Dumper::Sortkeys = 1;

diff --git a/lib/Devel/Cover/DB/IO.pm b/lib/Devel/Cover/DB/IO.pm
@@ -10,8 +10,6 @@ package Devel::Cover::DB::IO;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 my $Format;
 
 BEGIN

diff --git a/lib/Devel/Cover/DB/IO/JSON.pm b/lib/Devel/Cover/DB/IO/JSON.pm
@@ -13,8 +13,6 @@ use warnings;
 use Fcntl ":flock";
 use JSON::PP;
 
-our $VERSION = "0.79";
-
 sub new
 {
     my $class = shift;

diff --git a/lib/Devel/Cover/DB/IO/Storable.pm b/lib/Devel/Cover/DB/IO/Storable.pm
@@ -12,8 +12,6 @@ use warnings;
 
 use Storable;
 
-our $VERSION = "0.79";
-
 sub new
 {
     my $class = shift;

diff --git a/lib/Devel/Cover/DB/Structure.pm b/lib/Devel/Cover/DB/Structure.pm
@@ -21,7 +21,6 @@ use Data::Dumper; $Data::Dumper::Indent = 1; $Data::Dumper::Sortkeys = 1;
 # For comprehensive debug logging.
 use constant DEBUG => 0;
 
-our $VERSION = "0.79";
 our $AUTOLOAD;
 
 sub new

diff --git a/lib/Devel/Cover/Op.pm b/lib/Devel/Cover/Op.pm
@@ -12,8 +12,6 @@ require 5.8.0;  # My patches to B::Concise didn't get released till 5.8.0.
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Data::Dumper; $Data::Dumper::Indent = 1; $Data::Dumper::Sortkeys = 1;
 
 use Devel::Cover qw( -ignore blib -ignore \\wB\\w );

diff --git a/lib/Devel/Cover/Pod.pm b/lib/Devel/Cover/Pod.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Pod;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Criterion";
 
 BEGIN { eval "use Pod::Coverage 0.06" }     # We'll use this if it is available.

diff --git a/lib/Devel/Cover/Report/Compilation.pm b/lib/Devel/Cover/Report/Compilation.pm
@@ -18,8 +18,6 @@ package Devel::Cover::Report::Compilation;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 
 # TODO - uncoverable code?

diff --git a/lib/Devel/Cover/Report/Html.pm b/lib/Devel/Cover/Report/Html.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Report::Html;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Report::Html_minimal";
 
 1;

diff --git a/lib/Devel/Cover/Report/Html_basic.pm b/lib/Devel/Cover/Report/Html_basic.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Report::Html_basic;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 use Devel::Cover::Web 0.79 "write_file";
 
@@ -449,8 +447,6 @@ package Devel::Cover::Report::Html_basic::Template::Provider;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Template::Provider";
 
 my %Templates;

diff --git a/lib/Devel/Cover/Report/Html_minimal.pm b/lib/Devel/Cover/Report/Html_minimal.pm
@@ -7,8 +7,6 @@ use Getopt::Long;
 use Devel::Cover::DB 0.79;
 use Devel::Cover::Truth_Table 0.79;
 
-our $VERSION = "0.79";
-
 #-------------------------------------------------------------------------------
 # Subroutine : get_coverage_for_line
 # Purpose    : Retreive all available data for requested metrics on a line.

diff --git a/lib/Devel/Cover/Report/Html_subtle.pm b/lib/Devel/Cover/Report/Html_subtle.pm
@@ -2,8 +2,6 @@ package Devel::Cover::Report::Html_subtle;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 use Devel::Cover::Truth_Table 0.79;
 
@@ -386,8 +384,6 @@ package Devel::Cover::Report::Html_subtle::Template::Provider;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Template::Provider";
 
 my %Templates;

diff --git a/lib/Devel/Cover/Report/Sort.pm b/lib/Devel/Cover/Report/Sort.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Report::Sort;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 
 sub print_sort

diff --git a/lib/Devel/Cover/Report/Text.pm b/lib/Devel/Cover/Report/Text.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Report::Text;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 
 sub print_runs

diff --git a/lib/Devel/Cover/Report/Text2.pm b/lib/Devel/Cover/Report/Text2.pm
@@ -2,8 +2,6 @@ package Devel::Cover::Report::Text2;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use Devel::Cover::DB 0.79;
 use Devel::Cover::Truth_Table;
 

diff --git a/lib/Devel/Cover/Statement.pm b/lib/Devel/Cover/Statement.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Statement;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Criterion";
 
 sub val         { $_[0][0] }

diff --git a/lib/Devel/Cover/Subroutine.pm b/lib/Devel/Cover/Subroutine.pm
@@ -10,8 +10,6 @@ package Devel::Cover::Subroutine;
 use strict;
 use warnings;
 
-our $VERSION = "0.79";
-
 use base "Devel::Cover::Criterion";
 
 sub uncoverable { $_[0][2] }