Changeset 96

Timestamp:

Oct 3, 2003, 10:53:27 AM (23 years ago)

Author:

eugene

Message:

changed ftable to fhead

File:

• trunk/Ohana/src/perl/src/wfi.keywords (modified) (1 diff)

trunk/Ohana/src/perl/src/wfi.keywords

@@ -62 +62 @@
 for ($i = 0; $i < $Nccd; $i++) {
     @chiphead = ();
-    @header = `ftable -X $i $fitsfile`;
+    @header = `fhead -x $i $fitsfile`;
     foreach $line (@header) {
         if ($line =~ /HIERARCH ESO DET CHIP\d INDEX=/) {