fix bump-version
Karen Etheridge [Wed, 9 Jul 2014 00:06:35 +0000 (17:06 -0700)]
lib/Import/Into.pm
maint/bump-version

index 2234738..3d93200 100644 (file)
@@ -4,7 +4,7 @@ use strict;
 use warnings FATAL => 'all';
 use Module::Runtime;
 
-our $VERSION = '1.002002'; # 1.2.2
+our $VERSION = '1.002002';
 
 sub _prelude {
   my $target = shift;
index 8cbc11d..8a345cc 100755 (executable)
@@ -7,7 +7,7 @@ use autodie;
 
 chomp(my $LATEST = qx(grep '^[0-9]' Changes | head -1 | awk '{print \$1}'));
 
-my @parts = split /\./, $LATEST;
+my @parts = map { m/(\d{1,3})/g } split /\./, $LATEST;
 push @parts, 0, 0;
 
 my $OLD_DECIMAL = sprintf('%i.%03i%03i', @parts);