Changeset 19279
- Timestamp:
- Aug 28, 2008, 5:35:51 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_finish.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_finish.pl
r19273 r19279 21 21 use PS::IPP::Config qw( :standard ); 22 22 use PStamp::RequestFile qw( :standard ); 23 use PStamp::Job qw( :standard ); 23 24 24 25 my ( $req_id, $req_name, $req_file, $product, $dbname, $verbose, $save_temps ); … … 159 160 160 161 # XXX: get the image_db from a table in the database, or maybe save it in the job 161 my $image_db = "ps_simtest"; 162 163 # unless $exp_id is null (e.g. stack images) get the metadata for this exposure 164 my ($row, $req_info, $project) = get_request_info($rows, $rownum); 165 my ($image_db) = resolve_project($project); 162 166 my $exp_info = get_exposure_info($image_db, $exp_id); 163 164 # unless $exp_id is null (e.g. stack images) get the metadata for this exposure165 my ($row, $req_info) = get_request_info($rows, $rownum) if $exp_id;166 167 167 168 if (($job_type eq "stamp") || ($job_type eq "get_image")) { … … 273 274 $rowinfo .= "$row->{WIDTH}|$row->{HEIGHT}"; 274 275 275 return ($row, $rowinfo );276 return ($row, $rowinfo, $row->{PROJECT}); 276 277 } 277 278
Note:
See TracChangeset
for help on using the changeset viewer.
