Changeset 20113

Timestamp:

Oct 13, 2008, 2:24:18 PM (18 years ago)

Author:

bills

Message:

minor tweaks

File:

• trunk/pstamp/test/test_lookup.pl (modified) (2 diffs)

trunk/pstamp/test/test_lookup.pl

@@ -53 +53 @@
 }
 
+$class_id = "null" if !defined($class_id);
+
 my $results = locate_images($ipprc, $image_db, $req_type, $img_type, $id, $class_id,
             $x, $y, $mjd_min, $mjd_max, $filter, $verbose);
@@ -67 +69 @@
     print "\tweight: $i->{weight}\n" if $i->{weight};
     print "\tastrom: $i->{astrom}\n" if $i->{astrom};
+    if ($img_type ne "stack") {
+        print "\tcamera: $i->{camera}\n";
+        print "\texp_id: $i->{exp_id}\n";
+        print "\texp_name: $i->{exp_name}\n";
+    }
 }