Index: trunk/psLib/src/dataIO/psFits.c
===================================================================
--- trunk/psLib/src/dataIO/psFits.c	(revision 4158)
+++ trunk/psLib/src/dataIO/psFits.c	(revision 4191)
@@ -7,6 +7,6 @@
  *  @author Robert DeSonia, MHPCC
  *
- *  @version $Revision: 1.32 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2005-06-08 21:07:59 $
+ *  @version $Revision: 1.33 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2005-06-09 19:40:51 $
  *
  *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -797,6 +797,5 @@
                       const psMetadata* header,
                       const psImage* input,
-                      int numZPlanes,
-                      char* extname)
+                      int numZPlanes)
 {
 
@@ -837,8 +836,4 @@
 
     fits_create_img(fits->p_fd, bitPix, naxis, naxes, &status);
-
-    if (extname != NULL) {
-        fits_update_key_str(fits->p_fd, "EXTNAME", (char*)extname, NULL, &status);
-    }
 
     if (bZero != 0) {        // set the bscale/bzero
@@ -1453,6 +1448,5 @@
 bool psFitsWriteTable(const psFits* fits,
                       psMetadata* header,
-                      psArray* table,
-                      char* extname)
+                      psArray* table)
 {
     int status = 0;
@@ -1524,4 +1518,13 @@
         }
         columnTypes->data[n] = fitsType;
+    }
+
+    psBool mStatus = false;
+    char* extname = psMetadataLookupPtr(&mStatus, header, "EXTNAME");
+    if ( ! mStatus) {
+        extname = psMetadataLookupPtr(&mStatus, header, "HDUNAME");
+        if (! mStatus) {
+            extname = NULL;
+        }
     }