Changeset 30633 for trunk

Timestamp:

Feb 14, 2011, 2:18:20 PM (15 years ago)

Author:

bills

Message:

it is an error for a successful job to have no reglist

File:

• trunk/pstamp/scripts/pstamp_finish.pl (modified) (1 diff)

trunk/pstamp/scripts/pstamp_finish.pl

@@ -228 +228 @@
                 close JRL;
             } else {
+                my_die("No reglist for successful job: $job_id", $req_id, $PS_EXIT_PROG_ERROR) 
+                    if $fault eq $PSTAMP_SUCCESS;
                 print STDERR "no reglist file for job $job_id\n" if $verbose;
                 print $tdf "$rownum|$fault|$error_string|0|$job_id|";