From: Graham Knop Date: Thu, 21 Aug 2014 15:36:25 +0000 (-0400) Subject: remove version bumping make targets and let distar handle it X-Git-Tag: v0.010003~8 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3523412977f60779ee6b7c04b2b26037b74dd141;p=p5sagit%2FApp-FatPacker.git remove version bumping make targets and let distar handle it --- diff --git a/maint/Makefile.include b/maint/Makefile.include deleted file mode 100644 index 336847c..0000000 --- a/maint/Makefile.include +++ /dev/null @@ -1,11 +0,0 @@ -bump: - maint/bump-version - rm Makefile -bumpminor: - maint/bump-version minor - rm Makefile -bumpmajor: - maint/bump-version major - rm Makefile -upload: $(DISTVNAME).tar$(SUFFIX) - cpan-upload $< diff --git a/maint/bump-version b/maint/bump-version deleted file mode 100755 index e1deafb..0000000 --- a/maint/bump-version +++ /dev/null @@ -1,42 +0,0 @@ -#!/usr/bin/env perl - -use strict; -use warnings FATAL => 'all'; -use autodie; - -chomp(my $LATEST = qx(grep '^[0-9]' Changes | head -1 | awk '{print \$1}')); - -my @parts = split /\./, $LATEST; -if (@parts == 2) { - @parts[1,2] = $parts[1] =~ /(\d{1,3})(\d{1,3})/; -} - -my $OLD_DECIMAL = sprintf('%i.%03i%03i', @parts); - -my %bump_part = (major => 0, minor => 1, bugfix => 2); - -my $bump_this = $bump_part{$ARGV[0]||'bugfix'}; - -die "no idea which part to bump - $ARGV[0] means nothing to me" - unless defined($bump_this); - -my @new_parts = @parts; - -$new_parts[$bump_this]++; - -my $NEW_DECIMAL = sprintf('%i.%03i%03i', @new_parts); - -warn "Bumping $OLD_DECIMAL -> $NEW_DECIMAL\n"; - -for my $PM_FILE (qw( - lib/App/FatPacker.pm -)) { - my $file = do { local (@ARGV, $/) = ($PM_FILE); <> }; - - $file =~ s/(?<=\$VERSION = ')${\quotemeta $OLD_DECIMAL}/${NEW_DECIMAL}/ - or die "unable to bump version number in $PM_FILE"; - - open my $out, '>', $PM_FILE; - - print $out $file; -}