test that VERSION has been changed earlier

diff --git a/lib/Distar.pm b/lib/Distar.pm
index a0d126c..c3d9453 100644 (file)
--- a/lib/Distar.pm
+++ b/lib/Distar.pm
@@ -63,11 +63,14 @@ sub run_preflight {
   $Ran_Preflight = 1;
   my $version = $ARGV[0];
 
-  system("git fetch");
-
   my $make = $Config{make};
   my $null = File::Spec->devnull;
 
+  system("git fetch");
+  if (system("git rev-parse --quiet --verify v$version >$null") == 0) {
+    die "Tag v$version already exists!";
+  }
+
   require File::Find;
   File::Find::find({ no_chdir => 1, wanted => sub {
     return