Index: trunk/psModules/src/concepts/pmConceptsWrite.c
===================================================================
--- trunk/psModules/src/concepts/pmConceptsWrite.c	(revision 25980)
+++ trunk/psModules/src/concepts/pmConceptsWrite.c	(revision 25998)
@@ -157,31 +157,35 @@
     }
     switch (item->type) {
-    case PS_DATA_STRING:
+      case PS_DATA_BOOL:
+        psTrace("psModules.concepts", 9, "Writing header %s: %d\n", keyword, item->data.B);
+        return psMetadataAddBool(hdu->header, PS_LIST_TAIL, keyword, PS_META_REPLACE, item->comment,
+                                 item->data.B);
+      case PS_DATA_STRING:
         psTrace("psModules.concepts", 9, "Writing header %s: %s\n", keyword, item->data.str);
         return psMetadataAddStr(hdu->header, PS_LIST_TAIL, keyword, PS_META_REPLACE, item->comment,
                                 item->data.V);
-    case PS_DATA_S32:
+      case PS_DATA_S32:
         psTrace("psModules.concepts", 9, "Writing header %s: %d\n", keyword, item->data.S32);
         return psMetadataAddS32(hdu->header, PS_LIST_TAIL, keyword, PS_META_REPLACE, item->comment,
                                 item->data.S32);
-    case PS_DATA_F32:
+      case PS_DATA_F32:
         psTrace("psModules.concepts", 9, "Writing header %s: %f\n", keyword, item->data.F32);
         return psMetadataAddF32(hdu->header, PS_LIST_TAIL, keyword, PS_META_REPLACE, item->comment,
                                 item->data.F32);
-    case PS_DATA_F64:
+      case PS_DATA_F64:
         psTrace("psModules.concepts", 9, "Writing header %s: %f\n", keyword, item->data.F64);
         return psMetadataAddF64(hdu->header, PS_LIST_TAIL, keyword, PS_META_REPLACE, item->comment,
                                 item->data.F64);
-    case PS_DATA_REGION: {
-            psString region = psRegionToString(*(psRegion*)item->data.V);
-            psTrace("psModules.concepts", 9, "Writing header %s: %s\n", keyword, region);
-            bool result = psMetadataAddStr(hdu->header, PS_LIST_TAIL, keyword, PS_META_REPLACE, item->comment,
-                                           region);
-            psFree(region);
-            return result;
-        }
-    default:
-      psWarning("Type of %s is not suitable for a FITS header --- not added.\n",
-                 item->name);
+      case PS_DATA_REGION: {
+          psString region = psRegionToString(*(psRegion*)item->data.V);
+          psTrace("psModules.concepts", 9, "Writing header %s: %s\n", keyword, region);
+          bool result = psMetadataAddStr(hdu->header, PS_LIST_TAIL, keyword, PS_META_REPLACE, item->comment,
+                                         region);
+          psFree(region);
+          return result;
+      }
+      default:
+        psWarning("Type of %s is not suitable for a FITS header --- not added.\n",
+                  item->name);
         return false;
     }