Changeset 6815 for branches/rel10_ifa/psModules/src/astrom/pmHDU.c

Timestamp:

Apr 7, 2006, 5:05:28 PM (20 years ago)

Author:

Paul Price

Message:

Working on pmFPACopy for lris blue

File:

• branches/rel10_ifa/psModules/src/astrom/pmHDU.c (modified) (1 diff)

branches/rel10_ifa/psModules/src/astrom/pmHDU.c

@@ -145 +145 @@
     }
 
-    if (!hdu->images && !psFitsWriteHeader(hdu->header, fits)) {
-        psError(PS_ERR_IO, false, "Unable to write header for extension %s\n", extname);
+    // Only a header
+    if (!hdu->images && !hdu->table) {
+        // Tell CFITSIO there's nothing there
+        psMetadataItem *naxis = psMetadataLookup(hdu->header, "NAXIS");
+        naxis->data.S32 = 0;
+
+        if (!psFitsWriteHeader(hdu->header, fits)) {
+            psError(PS_ERR_IO, false, "Unable to write header for extension %s\n", extname);
+        }
     }