Changeset 6719

Timestamp:

Mar 28, 2006, 1:17:18 PM (20 years ago)

Author:

magnier

Message:

fixed psFitsWriteHeader to output COMMENT and HISTORY fields

File:

• branches/rel10_ifa/psLib/src/fits/psFitsHeader.c (modified) (2 diffs)

branches/rel10_ifa/psLib/src/fits/psFitsHeader.c

@@ -7 +7 @@
  *  @author Robert DeSonia, MHPCC
  *
- *  @version $Revision: 1.2.4.1 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2006-03-16 01:00:42 $
+ *  @version $Revision: 1.2.4.2 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2006-03-28 23:17:18 $
  *
  *  Copyright 2004-2005 Maui High Performance Computing Center, University of Hawaii
@@ -275 +275 @@
             break;
         case PS_DATA_STRING:
+            if (!strcmp (item->name, "COMMENT")) {
+                fits_write_comment(fits->fd, item->comment, &status);
+                break;
+            }
+            if (!strcmp (item->name, "HISTORY")) {
+                fits_write_history(fits->fd, item->comment, &status);
+                break;
+            }
             fits_update_key(fits->fd,
                             TSTRING,