From: Graham Knop <haarg@haarg.org>
Date: Fri, 21 Feb 2014 18:32:34 +0000 (-0500)
Subject: check that cpan-upload is available before starting release
X-Git-Tag: v0.002000~26
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c789d7d67ff3136c9c6b476c517ee41808f4b3a0;p=p5sagit%2FDistar.git

check that cpan-upload is available before starting release
---

diff --git a/lib/Distar.pm b/lib/Distar.pm
index 163705f..a06fb3f 100644
--- a/lib/Distar.pm
+++ b/lib/Distar.pm
@@ -102,6 +102,9 @@ sub run_preflight {
   @cached == 2 or die "Pre-commit Changes not just Changes line";
   $cached[0] =~ /^\+\+\+ .\/Changes\n/ or die "Changes not changed";
   $cached[1] eq "+$changes_line" or die "Changes new line should be: \n\n$changes_line ";
+
+  { no warnings 'exec'; `cpan-upload -h`; }
+  $? and die "cpan-upload not available";
 }
 
 {