Index: trunk/ippScripts/Build.PL
===================================================================
--- trunk/ippScripts/Build.PL	(revision 26639)
+++ trunk/ippScripts/Build.PL	(revision 26670)
@@ -100,4 +100,5 @@
 	scripts/dqstats_bundle.pl
         scripts/whichimage
+        scripts/automate_stacks.pl
     )],
     dist_abstract => 'Scripts for running the Pan-STARRS IPP',
Index: trunk/ippScripts/MANIFEST
===================================================================
--- trunk/ippScripts/MANIFEST	(revision 26639)
+++ trunk/ippScripts/MANIFEST	(revision 26670)
@@ -36,3 +36,4 @@
 scripts/isp_trans.pl
 scripts/ds9_cmf_regions.pl
+scripts/automate_stacks.pl
 t/00_distribution.t
Index: trunk/ippScripts/scripts/automate_stacks.pl
===================================================================
--- trunk/ippScripts/scripts/automate_stacks.pl	(revision 26639)
+++ trunk/ippScripts/scripts/automate_stacks.pl	(revision 26670)
@@ -36,5 +36,5 @@
 my ( $date, $camera, $dbname, $logfile, $verbose);
 my ( $check_registration, $define_burntool, $queue_burntool, $check_chips, $queue_chips, $check_stacks, $queue_stacks);
-my ( $help, $this_target_only, $this_filter_only, $isburning);
+my ( $help, $this_target_only, $this_filter_only, $isburning, $force_stack_count);
 GetOptions(
     'help|h'               => \$help,
@@ -54,4 +54,5 @@
     'this_filter_only=s'   => \$this_filter_only,
     'isburning'            => \$isburning,
+    'force_stack_count'    => \$force_stack_count,
     ) or pod2usage ( 2 );
 pod2usage( -msg => 
@@ -65,4 +66,6 @@
            --this_target_only     Process only a single target.
            --this_filter_only     Process only a single filter.
+           --isburning            Signal that we are currently burntooling.
+           --force_stack_count    Force the chip/warp counts.
         Modes:
            --check_registration   Confirm the data downloaded correctly.
@@ -527,5 +530,5 @@
 	foreach my $filter (@filter_list) {
 	    my ($Nexposures,$NprocChips,$NprocWarps,$Nalready) = pre_stack_queue($date,$target,$filter);
-	    if (($NprocChips != $NprocWarps)) { #||($NprocWarps == 0)||($NprocChips == 0)) {
+	    if ((!defined($force_stack_count))&&($NprocChips != $NprocWarps)) { # This makes me sad. :(
 		print STDERR "execute_stacks: Target $target on $date is not fully processed. ($NprocChips $NprocWarps)\n";
 		$metadata_out{nsState} = 'FORCETOWARP';