Changeset 35364 for trunk/pstamp/scripts/pstamp_finish.pl
- Timestamp:
- Apr 4, 2013, 1:09:34 PM (13 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_finish.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_finish.pl
r34447 r35364 107 107 my ($header, $rows) = read_request_file($req_file); 108 108 109 my $action = $header->{ACTION}; 110 111 if (!$header or (($action eq 'PROCESS') and !$rows)) { 109 if (!$header or !$rows) { 112 110 # Since a request got queued, the request file must have been readable at some point 113 111 my_die("failed to read request file $req_file", $req_id, $PS_EXIT_CONFIG_ERROR); … … 128 126 129 127 my $request_fault = 0; 130 if ($action eq 'PROCESS'){128 { 131 129 # The results table definition file 132 130 my ($tdf, $table_def_name) = tempfile ("$outdir/tabledef.XXXX", UNLINK => !$save_temps); … … 273 271 } 274 272 } 275 } elsif ($action ne 'LIST') {276 my_die("Unexpected action $action found", $req_id, $PS_EXIT_PROG_ERROR);277 } else {278 # pstampparse did all of the work279 273 } 280 274
Note:
See TracChangeset
for help on using the changeset viewer.
