Checking in changes prior to tagging of version 0.50. Changelog diff is:

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 63)
+++ ChangeLog	(working copy)
@@ -1,5 +1,9 @@
+0.50
+        * --skip-tests option, for when tests are long and a step after DistTest fails,
+	  so next time around you can run shipit faster.  use is discouraged.
 
 	* fix MakeMaker manicheck to ignore META.yml and inc/ directory for Module::Install
+
 	* Make Perl::ModuleBuild actually work. You need to add .shipit to MANIFEST.SKIP
 	  to prevent disttest from failing (miyagawa)

ChangeLog

@@ -1,5 +1,9 @@
+0.50
+        * --skip-tests option, for when tests are long and a step after DistTest fails,
+	  so next time around you can run shipit faster.  use is discouraged.
 
 	* fix MakeMaker manicheck to ignore META.yml and inc/ directory for Module::Install
+
 	* Make Perl::ModuleBuild actually work. You need to add .shipit to MANIFEST.SKIP
 	  to prevent disttest from failing (miyagawa)
 

lib/ShipIt.pm

@@ -6,7 +6,7 @@ use ShipIt::State;
 use ShipIt::VC;
 use ShipIt::Util;
 
-$VERSION = '0.49';
+$VERSION = '0.50';
 
 =head1 NAME
 

lib/ShipIt/State.pm

@@ -121,6 +121,20 @@ commit/tag/upload stuff... just test if everything would've succeeded.
 sub set_dry_run { $_[0]{dryrun} = $_[1] }
 sub dry_run     { $_[0]{dryrun}         }
 
+=head2 skip_tests
+
+   $dry = $state->skip_tests;
+
+Accessor for "skip tests" flag.  If set, you should skip
+tests.  Presumably user already ran shipit, tests passed,
+and then some later step failed, and they want to ship
+quickly, without running entire test suite again.
+
+=cut
+
+sub set_skip_tests { $_[0]{skiptests} = $_[1] }
+sub skip_tests     { $_[0]{skiptests}         }
+
 =head2 set_distfile
 
 =head2 distfile

lib/ShipIt/Step/DistTest.pm

@@ -5,6 +5,10 @@ use base 'ShipIt::Step';
 sub run {
     my ($self, $state) = @_;
     my $pt = $state->pt;
+    if ($state->skip_tests) {
+        warn "\n**** ShipIt:  SKIPPING DIST TEST\n\n";
+        return;
+    }
     die "Making dist & testing failed." unless $pt->disttest;
 }
 

shipit

@@ -10,9 +10,11 @@ use constant CONFFILE => ".shipit";
 
 my $opt_dry;
 my $opt_wc;
+my $opt_skiptests;
 exit(1) unless
     GetOptions("dry-run|n"    => \$opt_dry,
                "write-config" => \$opt_wc,
+               "skip-test"    => \$opt_skiptests,
                );
 
 my $dir = shift || getcwd;
@@ -36,6 +38,7 @@ unless (-e CONFFILE) {
 my $conf  = ShipIt::Conf->parse(CONFFILE);
 my $state = ShipIt::State->new($conf);
 $state->set_dry_run($opt_dry);
+$state->set_skip_tests($opt_skiptests);
 
 foreach my $step ($conf->steps) {
     warn "Running step $step\n";
@@ -51,6 +54,7 @@ shipit - Executable for ShipIt
  $ shipit
  $ shipit --dry-run       # or -n
  $ shipit --write-config
+ $ shipit --skip-tests    # but please don't.
 
 =head1 SEE ALSO