Index: trunk/Ohana/src/opihi/cmd.data/extract.c
===================================================================
--- trunk/Ohana/src/opihi/cmd.data/extract.c	(revision 7080)
+++ trunk/Ohana/src/opihi/cmd.data/extract.c	(revision 7917)
@@ -10,5 +10,5 @@
 
   if (argc != 11) {
-    fprintf (stderr, "USAGE: extract <from> <to> sx sy nx ny Sx Sy Nx Ny\n");
+    gprint (GP_ERR, "USAGE: extract <from> <to> sx sy nx ny Sx Sy Nx Ny\n");
     return (FALSE);
   }
@@ -29,6 +29,6 @@
 
   if ((Sy + ny > Ny) || (Sx + nx > Nx)) {
-    fprintf (stderr, "mismatch between source and dest regions\n");
-    fprintf (stderr, "%d + %d > %d or %d + %d > %d\n", Sy, ny, Ny, Sx, nx, Nx);
+    gprint (GP_ERR, "mismatch between source and dest regions\n");
+    gprint (GP_ERR, "%d + %d > %d or %d + %d > %d\n", Sy, ny, Ny, Sx, nx, Nx);
     return (FALSE);
   }
@@ -38,14 +38,14 @@
       (sx > in[0].matrix.Naxis[0]) || 
       (sy > in[0].matrix.Naxis[1])) {
-    fprintf (stderr, "region outside of source image\n");
+    gprint (GP_ERR, "region outside of source image\n");
     return (FALSE);
   }
 
   if ((Sx + nx > Nx) || (Sy + ny > Ny)) {
-    fprintf (stderr, "source region larger than dest region\n");
+    gprint (GP_ERR, "source region larger than dest region\n");
     return (FALSE);
   }
   if ((Sx < 0) || (Sy < 0)) {
-    fprintf (stderr, "dest region out of range\n");
+    gprint (GP_ERR, "dest region out of range\n");
     return (FALSE);
   }
@@ -68,6 +68,6 @@
   } else {
     if ((out[0].header.Naxis[1] != Ny) || (out[0].header.Naxis[0] != Nx)) {
-      fprintf (stderr, "matrix sizes mis-matched\n");
-      fprintf (stderr, "%d x %d  vs  %d x %d\n", Nx, Ny, 
+      gprint (GP_ERR, "matrix sizes mis-matched\n");
+      gprint (GP_ERR, "%d x %d  vs  %d x %d\n", Nx, Ny, 
 	       out[0].header.Naxis[0], out[0].header.Naxis[1]);
       return (FALSE);