Index: trunk/ippScripts/scripts/camera_exp.pl
===================================================================
--- trunk/ippScripts/scripts/camera_exp.pl	(revision 25835)
+++ trunk/ippScripts/scripts/camera_exp.pl	(revision 27010)
@@ -154,4 +154,5 @@
 # XXX we perform astrometry iff photometry output exists
 my $chipObjectsExist = 0;
+my @outMasks;                   # Names of output masks
 foreach my $file (@$files) {
     # use the path_base as OUTPUT root and convert the filenames with ipprc->filename:
@@ -175,4 +176,6 @@
     print $list3File ($chipObjects . "\n");
     print $list4File ($chipMask . "\n");
+
+    push @outMasks, $ipprc->filename("PSASTRO.OUTPUT.MASK", $outroot, $class_id);
 }
 close $list1File;
@@ -245,7 +248,7 @@
         my $command;
         $command  = "$psastro";
-	$command .= " -list $list3Name";
-	$command .= " -masklist $list4Name";
-	$command .= " $outroot";
+        $command .= " -list $list3Name";
+        $command .= " -masklist $list4Name";
+        $command .= " $outroot";
         $command .= " -recipe PSASTRO $recipe_psastro";
         $command .= " -tracedest $traceDest -log $logDest";
@@ -293,4 +296,8 @@
         if (!$quality) {
             &my_die("Unable to find expected output file: $fpaObjects", $cam_id, $PS_EXIT_PROG_ERROR) unless -f $ipprc->file_resolve($fpaObjects);
+
+            foreach my $outMask (@outMasks) {
+                &my_die("Unable to find expected output file: $outMask", $cam_id, $PS_EXIT_SYS_ERROR) unless -f $ipprc->file_resolve($outMask);
+            }
         }