Index: trunk/Ohana/src/opihi/dvo/cmpread.c
===================================================================
--- trunk/Ohana/src/opihi/dvo/cmpread.c	(revision 7680)
+++ trunk/Ohana/src/opihi/dvo/cmpread.c	(revision 7917)
@@ -16,5 +16,5 @@
 
   if (argc != 3) {
-    fprintf (stderr, "USAGE: cmpread field <filename>\n");
+    gprint (GP_ERR, "USAGE: cmpread field <filename>\n");
     return (FALSE);
   }
@@ -34,5 +34,5 @@
   if (!strcasecmp (argv[1], "galmag"))  field = F_GALMAG;
   if (field == F_NONE) {
-    fprintf (stderr, "invalid cmp field: %s\n", argv[1]);
+    gprint (GP_ERR, "invalid cmp field: %s\n", argv[1]);
     return (FALSE);
   }
@@ -42,5 +42,5 @@
   /* load FITS header */
   if (!gfits_read_header (argv[2], &header)) {
-    fprintf (stderr, "ERROR: can't read header for %s\n", argv[2]);
+    gprint (GP_ERR, "ERROR: can't read header for %s\n", argv[2]);
     return (FALSE);
   }
@@ -48,5 +48,5 @@
   if ((field == F_RA) || (field == F_DEC)) {
     if (!GetCoords (&coords, &header)) {
-      fprintf (stderr, "can't get WCS info from header\n");
+      gprint (GP_ERR, "can't get WCS info from header\n");
       gfits_free_header (&header);
       return (FALSE);
@@ -57,5 +57,5 @@
   f = fopen (argv[2], "r");
   if (f == NULL) {
-    fprintf (stderr, "ERROR: can't read data from %s\n", argv[2]);
+    gprint (GP_ERR, "ERROR: can't read data from %s\n", argv[2]);
     gfits_free_header (&header);
     return (FALSE);
@@ -65,5 +65,5 @@
   /* find expected number of stars */
   if (!gfits_scan (&header, "NSTARS", "%d", 1, &Nstars)) {
-    fprintf (stderr, "ERROR: can't get NSTARS from header\n");
+    gprint (GP_ERR, "ERROR: can't get NSTARS from header\n");
     gfits_free_header (&header);
     return (FALSE);
@@ -74,5 +74,5 @@
   gfits_scan (&header, "EXTEND",  "%t", 1, &extend);
   if (extend) {
-    fprintf (stderr, "reading from FITS cmp file %s\n", argv[2]);
+    gprint (GP_ERR, "reading from FITS cmp file %s\n", argv[2]);
     Nbytes = gfits_matrix_size (&header);
     fseek (f, Nbytes, SEEK_CUR); 
@@ -80,7 +80,7 @@
   } else {
     /* allocate space for stars */
-    fprintf (stderr, "reading from TEXT cmp file %s\n", argv[2]);
+    gprint (GP_ERR, "reading from TEXT cmp file %s\n", argv[2]);
     if (!gfits_scan (&header, "NSTARS", "%d", 1, &Nstars)) {
-      fprintf (stderr, "ERROR: failed to find NSTARS\n");
+      gprint (GP_ERR, "ERROR: failed to find NSTARS\n");
       exit (1);
     }
@@ -139,5 +139,5 @@
   free (stars);
   gfits_free_header (&header);
-  fprintf (stderr, "loaded %d objects\n", Nstars);
+  gprint (GP_ERR, "loaded %d objects\n", Nstars);
   return (TRUE);
 }