X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=helpers%2Fbump-version;h=5373656fbb4c600c6be43ef14a33a7555c7a0026;hb=eb3aeb36f8f5c565e3000d04f32d43c1cb8fbd15;hp=4e0ebab249e43be1509c7fbd6d6a0dc481aca3ff;hpb=40635bc95f95d6b36ab8ae82222b63f2a89db3d3;p=p5sagit%2FDistar.git

diff --git a/helpers/bump-version b/helpers/bump-version
index 4e0ebab..5373656 100755
--- a/helpers/bump-version
+++ b/helpers/bump-version
@@ -3,7 +3,7 @@
 use strict;
 use warnings FATAL => 'all';
 use File::Find;
-use Getopt::Long qw(:config gnu_compat);
+use Getopt::Long qw(:config gnu_getopt);
 use File::Temp ();
 
 GetOptions(
@@ -11,7 +11,9 @@ GetOptions(
   "force"   => \my $force,
 ) or die("Error in command line arguments\n");
 
-my ($old_version, $bump) = @ARGV;
+my $old_version = shift
+  or die "no old version provided!\n";
+my $bump = shift;
 my ($new_decimal, $new_vstring) = bump_version($old_version, $bump);
 
 warn "Bumping $old_version -> $new_decimal\n";