From: Karen Etheridge Date: Thu, 22 Aug 2013 05:48:01 +0000 (-0700) Subject: accomodate a single dot X-Git-Tag: v1.000016~3 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FModule-Metadata.git;a=commitdiff_plain;h=31ad4065285401802d562e882bde28c5ea524a4d accomodate a single dot --- diff --git a/maint/bump-version b/maint/bump-version index f3b01e6..3434fde 100755 --- a/maint/bump-version +++ b/maint/bump-version @@ -8,6 +8,7 @@ use autodie; chomp(my $LATEST = qx(grep '^[0-9]' Changes | head -1 | awk '{print \$1}')); my @parts = split /\./, $LATEST; +splice(@parts, 1, 0, 0) if @parts == 2; my $OLD_DECIMAL = sprintf('%i.%03i%03i', @parts);