From b5991f55e5cb374aeb2c4a417bea4672801f1d0e Mon Sep 17 00:00:00 2001
From: Andreas Koenig <andk@cpan.org>
Date: Sat, 5 Jan 2013 13:31:12 +0100
Subject: [PATCH] remind me of checking in, tagging and uploading in the
 correct order

---
 Changes                         | 10 ++++++++++
 Makefile.PL                     |  9 ++++++++-
 lib/File/Rsync/Mirror/Recent.pm |  2 +-
 3 files changed, 19 insertions(+), 2 deletions(-)

diff --git a/Changes b/Changes
index 456bf54..4aa8838 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,13 @@
+2013-01-05  k  <k@k83.linux.bogus>
+
+	* release 0.3.4
+
+	* release 0.3.3
+
+	* no functional change, just bump the version number. Just the
+	Makefile.PL to remind me of checking in, tagging and uploading in the
+	correct order.
+
 2012-12-31  k  <andk@cpan.org>
 
 	* release 0.3.2
diff --git a/Makefile.PL b/Makefile.PL
index eea7a3a..e80b450 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -9,8 +9,11 @@ my $version = MM->parse_version($version_from);
 if ($ARGV[0]){
     if ($ARGV[0] eq "--setversion") {
         die "Your perl is a bit dated[$]].\nDo not make a release with it\n" if $] < 5.008;
-        die "Your MakeMaker is a bit dated[$ExtUtils::MakeMaker::VERSION].\nYou should get a new one\n"
+        die "Your MakeMaker is a bit dated[$ExtUtils::MakeMaker::VERSION].\nDo not make a release with it\n"
             if $ExtUtils::MakeMaker::VERSION < 6.4502;
+        local $ENV{LANG} = "C";
+        my $dirty = `git status --porcelain --untracked-files=no`;
+        die "Not everything checked in or out?\n====\n$dirty====\n" if $dirty;
         use lib "lib";
         eval {  require $version_from; }; die $@ if $@;
         my $makefile = "Makefile";
@@ -91,6 +94,7 @@ WriteMakefile
      dist => {
               DIST_DEFAULT => join(" ", # note: order matters!
                                    "verify-changes-date",
+                                   "verify-changes-version",
                                    "Makefile",
                                    "META.yml",
                                    "setversion",
@@ -146,6 +150,9 @@ verify-changes-date:
 	@$(PERL) -ne 'BEGIN{my@t=(localtime)[5,4,3];$$t[0]+=1900;$$t[1]++;$$t=sprintf"%04d-%02d-%02d",@t}' \
 		-e '$$ok++,exit if /^$$t\s/; END{die "Alert: did not find <$$t> in Changes file" unless $$ok}' Changes
 
+verify-changes-version:
+	@$(PERL) -ne '$$ok++,exit if /\b$(VERSION)\b/; END{die "Alert: did not find <$(VERSION)> in Changes file" unless $$ok}' Changes
+
 verify-no-subdir:
 	@$(PERL) -e 'my$$s=join",",grep{!/^($(OKDIRS))\z/x&&-d($$_)}glob"*";' \
 		-e 'die"unexpected dir:$$s"if$$s'
diff --git a/lib/File/Rsync/Mirror/Recent.pm b/lib/File/Rsync/Mirror/Recent.pm
index 366792e..ccdfdb7 100644
--- a/lib/File/Rsync/Mirror/Recent.pm
+++ b/lib/File/Rsync/Mirror/Recent.pm
@@ -28,7 +28,7 @@ use Storable;
 use Time::HiRes qw();
 use YAML::Syck;
 
-use version; our $VERSION = qv('0.3.2');
+use version; our $VERSION = qv('0.3.4');
 
 =head1 SYNOPSIS
 
-- 
2.11.4.GIT