Changeset 26289 for trunk/pstamp/scripts/pstamp_finish.pl

Timestamp:

Nov 29, 2009, 3:17:29 PM (17 years ago)

Author:

bills

Message:

various changes to the postage stamp server.

File:

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

trunk/pstamp/scripts/pstamp_finish.pl

@@ -315 +315 @@
     my $comment = $row->{COMMENT};
     $comment = "null" if !$comment;
-    my $label = $row->{LABEL};
-    $label = "null" if !$label;
+    my $data_group = $row->{DATA_GROUP};
+    if (!defined $data_group) {
+        # XXX: backwards compatibility hook. Remove "soon".
+        $data_group = $row->{LABEL};
+    }
+    $data_group = "null" if !$data_group;
 
     # This is ugly, error prone and hard to change.
     # Create a results file module and provide a list of the names (we have the data in the columns)
     my $rowinfo = "$row->{PROJECT}|$row->{JOB_TYPE}|$row->{REQ_TYPE}|$row->{IMG_TYPE}|";
-    $rowinfo   .= "$row->{ID}|$tess_id|$component|$label|$row->{OPTION_MASK}|$row->{MJD_MIN}|$row->{MJD_MAX}|";
+    $rowinfo   .= "$row->{ID}|$tess_id|$component|$data_group|$row->{OPTION_MASK}|$row->{MJD_MIN}|$row->{MJD_MAX}|";
     $rowinfo   .= "$row->{REQFILT}|$row->{COORD_MASK}|$row->{CENTER_X}|$row->{CENTER_Y}|";
     $rowinfo   .= "$row->{WIDTH}|$row->{HEIGHT}|";