Changeset 29771

Timestamp:

Nov 12, 2010, 4:37:29 PM (15 years ago)

Author:

rhenders

Message:

Minor cleanup

File:

• trunk/tools/czartool/Plotter.pm (modified) (5 diffs)

trunk/tools/czartool/Plotter.pm

@@ -599 +599 @@
     my ($self, $begin, $end) = @_;
 
+    # get exposures between these dates
+    my $exp_ids = undef;
+    if (!$self->{_gpc1Db}->getProcessedExposures($begin, $end, \$exp_ids)) {return 0;}
+    my $totalExp = @{$exp_ids};
+    if ($totalExp < 1) {return 0;}
+
     # set up file stuff
     my $prefix = $self->{_outputPath} ? $self->{_outputPath} : "."; # TODO should be function for this
@@ -604 +610 @@
     my $distOutputFile = "$prefix/czarplot_magic_mask_fraction_d.png";
     my $tmpFile = File::Temp->new( TEMPLATE => "czarplot_magic_mask_fraction.XXXXX", DIR => '/tmp', SUFFIX => 'dat');
-
-    my $exp_ids = undef;
-    if (!$self->{_gpc1Db}->getProcessedExposures($begin, $end, \$exp_ids)) {return 0;}
-
 
     # set up bins
@@ -628 +630 @@
         $mask = $self->{_gpc1Db}->getAverageMagicMaskFraction(@{$row}[0]);
 
-        if (!$mask) {print "can't get value for @{$row}[0]\n";next;}
+        if (!$mask) {next;}
         $expCount++;
 
@@ -641 +643 @@
 
     # write data to GNUPLOT data file
-    my $totalExp = @{$exp_ids};
     print "* Found mask values for $expCount exposures out of $totalExp\n";
     open (GNUDAT, ">".$tmpFile->filename);
@@ -665 +666 @@
     print GP
         "set term $self->{_outputFormat};" .
-        "set title \"Magic mask fraction for $expCount (of $totalExp) exposures between '$begin' and '$end'\";" .
+        "set title \"Magic mask fraction for $expCount exposures between '$begin' and '$end'\";" .
         "set grid;" .
         "set boxwidth;" .