From: Vincent Pit <vince@profvince.com>
Date: Tue, 6 Aug 2013 03:58:14 +0000 (-0300)
Subject: Don't support old development releases anymore
X-Git-Tag: v0.05~17
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=41b56a84dc14873e4c9638d315b3fc525324c288;p=perl%2Fmodules%2Fre-engine-Hooks.git

Don't support old development releases anymore
---

diff --git a/Makefile.PL b/Makefile.PL
index b481d58..5f8a9fd 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -44,6 +44,26 @@ my %META = (
  },
 );
 
+my $latest_dev_rev = 19;
+
+sub is_outdated_dev_perl {
+ my ($rev) = "$]" =~ /^5\.([0-9]{2}[13579])/;
+
+ return unless defined $rev;
+
+ return $rev < $latest_dev_rev;
+}
+
+if (is_outdated_dev_perl) {
+ print STDERR <<EOF;
+     This version of perl ($]) is an outdated development release.
+     re::engine::Hooks supports all stable releases since 5.10.1, and
+     development releases after 5.$latest_dev_rev.0 only. Please consider upgrading
+     your perl to a more recent release.
+EOF
+ exit 0;
+}
+
 sub versioned_file {
  my ($file) = @_;
 
@@ -64,10 +84,9 @@ sub versioned_file {
 
 unless (defined versioned_file('regcomp.c')) {
  print STDERR <<EOF;
-     This version of perl ($]) is not supported by this version of
-     re::engine::Hooks. If your perl has been recently released,
-     make sure there isn't a newer version of the module available
-     on the CPAN.
+     This version of perl ($]) is not yet supported by this version of
+     re::engine::Hooks. If your perl has been recently released, make
+     sure there isn't a newer version of the module available on the CPAN.
 EOF
  exit 0;
 }
diff --git a/lib/re/engine/Hooks.pm b/lib/re/engine/Hooks.pm
index a7f9a1c..fabe4bb 100644
--- a/lib/re/engine/Hooks.pm
+++ b/lib/re/engine/Hooks.pm
@@ -210,7 +210,7 @@ It implements a couple of simple examples.
 
 =head1 DEPENDENCIES
 
-L<perl> 5.10.1.
+Any stable release of L<perl> since 5.10.1, or a development release of L<perl> from the 5.19 branch.
 
 L<ExtUtils::Depends>.