Changeset 28298
- Timestamp:
- Jun 10, 2010, 1:55:37 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/addstar_run.pl (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/addstar_run.pl
r28211 r28298 36 36 exit($PS_EXIT_CONFIG_ERROR); 37 37 } 38 38 my $minidvodb_path; 39 39 my ( $exp_tag, $add_id, $camera, $outroot, $camroot, $dbname, $reduction, $dvodb, $minidvodb, $minidvodb_name, $minidvodb_group, $image_only, $verbose, $no_update, 40 40 $no_op, $redirect, $save_temps); … … 132 132 &my_die("Unable to parse metadata list", $add_id, $PS_EXIT_PROG_ERROR); 133 133 my $comp = $$components[0]; 134 $minidvodb_path = $comp->{minidvodb_path}; 134 135 $minidvodb_name = $comp->{minidvodb_name}; 135 136 137 if (!defined($minidvodb_path)) { 138 &my_die("Unable to parse minidvodb_path", $add_id, $PS_EXIT_PROG_ERROR); 139 } 136 140 if (!defined($minidvodb_name)) { 137 141 &my_die("Unable to parse minidvodb_name", $add_id, $PS_EXIT_PROG_ERROR); 138 } 139 142 } 140 143 } 141 144 # tack on the minidvodb part to the db. 142 $dvodbReal = $dvodbReal . '/' . $minidvodb_name . '/'; 145 # $dvodbReal = $dvodbReal . '/' . $minidvodb_name . '/'; 146 #we don't need this now that I fixed the paths 143 147 144 148 } … … 160 164 my $command = "$addstar -update"; # XXX optionally set -update? 161 165 $command .= " -D CAMERA $camdir"; 162 $command .= " -D CATDIR $ dvodbReal";166 $command .= " -D CATDIR $minidvodb_path"; 163 167 $command .= " $realFile"; 164 168 $command .= " -use-name $fpaObjects"; # DVO wants the neb-name as a file reference … … 182 186 $fpaCommand .= " -path_base $outroot"; 183 187 $fpaCommand .= " -dtime_addstar $dtime_addstar"; 184 $fpaCommand .= " -dvodb_path $ dvodbReal" if defined $dvodbReal;188 $fpaCommand .= " -dvodb_path $minidvodb_path" if defined $minidvodb_path; 185 189 $fpaCommand .= " -minidvodb_name $minidvodb_name" if defined $minidvodb_name; 186 190 $fpaCommand .= " -dbname $dbname" if defined $dbname; … … 213 217 $command .= " -addprocessedexp"; 214 218 $command .= " -fault $exit_code"; 215 $command .= " -dvodb_path $ dvodbReal" if defined $dvodbReal;219 $command .= " -dvodb_path $minidvodb_path" if defined $minidvodb_path; 216 220 $command .= " -path_base $outroot" if defined $outroot; 217 221 $command .= (" -dtime_addstar " . ((DateTime->now->mjd - $mjd_start) * 86400));
Note:
See TracChangeset
for help on using the changeset viewer.
