Changeset 18540 for trunk/pstamp/scripts/dqueryparse.pl
- Timestamp:
- Jul 15, 2008, 10:03:18 AM (18 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/dqueryparse.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/dqueryparse.pl
r18237 r18540 69 69 70 70 my $response_file = "$out_dir/response.fits"; 71 my $ result;71 my $fault; 72 72 { 73 73 my $command = "$fakedresponse --input $uri --output $response_file --workdir $out_dir"; … … 80 80 warn("Unable to perform $command error code: $error_code"); 81 81 } 82 $ result = $error_code >> 8;82 $fault = $error_code >> 8; 83 83 } 84 84 … … 86 86 { 87 87 my $command = "$pstamptool -addjob -req_id $req_id -uri $uri -outputBase $out_dir -job_type detect_query"; 88 $command .= " -state stop - result $result";88 $command .= " -state stop -fault $fault"; 89 89 90 90 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
Note:
See TracChangeset
for help on using the changeset viewer.
