Index: trunk/ippScripts/scripts/whichimage
===================================================================
--- trunk/ippScripts/scripts/whichimage	(revision 31678)
+++ trunk/ippScripts/scripts/whichimage	(revision 31710)
@@ -21,6 +21,7 @@
      $tess_id,
      $dvo_dir,
+     $smf,
+     $listchipcoords,
      $one,
-     $smf,
      $verbose,
      $save_temps,
@@ -31,4 +32,5 @@
            'dvo_dir=s' => \$dvo_dir,
            'smf=s'      => \$smf,
+           'listchipcoords'        => \$listchipcoords,
            'one'        => \$one,
            'verbose'    => \$verbose,
@@ -90,5 +92,6 @@
 close $ch;
 
-my $cmd = "dvoImagesAtCoords $coord_file";
+my $cmd = "dvoImagesAtCoords -chipcoords $coord_file";
+$cmd .= " -listchipcoords" if $listchipcoords;
 
 my $status = 0;
@@ -151,4 +154,5 @@
 
     my $command = "$dvoImagesAtCoords -full-names -coords $infile $images_arg";
+    $command .= " -listchipcoords" if $listchipcoords;
 
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
@@ -158,6 +162,10 @@
         foreach my $line (@lines) {
             chomp $line;
-            my ($row, $ra, $dec, $component) = split " ", $line;
-            print "$ra $dec $component_label $component\n";
+            my ($row, $ra, $dec, $component, $x, $y) = split " ", $line;
+            print "$ra $dec $component_label $component";
+            if ($listchipcoords) {
+                print " $x $y";
+            }
+            print "\n";
         }
     }