Index: trunk/Ohana/src/opihi/cmd.data/vgauss.c
===================================================================
--- trunk/Ohana/src/opihi/cmd.data/vgauss.c	(revision 4303)
+++ trunk/Ohana/src/opihi/cmd.data/vgauss.c	(revision 7917)
@@ -7,5 +7,5 @@
   c = get_variable (A); \
   if (c == NULL) { \
-    fprintf (stderr, "missing fit parameter A\n"); \
+    gprint (GP_ERR, "missing fit parameter A\n"); \
     return (FALSE); \
   } \
@@ -31,6 +31,6 @@
 
   if (argc != 5) {
-    fprintf (stderr, "USAGE: vgauss <x> <y> <dy> (out)\n");
-    fprintf (stderr, " uses guesses: C0 (mean), C1 (sigma), C2 (norm), C3 (sky)\n");
+    gprint (GP_ERR, "USAGE: vgauss <x> <y> <dy> (out)\n");
+    gprint (GP_ERR, " uses guesses: C0 (mean), C1 (sigma), C2 (norm), C3 (sky)\n");
     return (FALSE);
   }
@@ -64,7 +64,7 @@
     dchisq = ochisq - chisq;
     ochisq = chisq;
-    if (!Quiet) fprintf (stderr, "dchisq: %f, Ndof: %d\n", dchisq, Npts - Npar);
+    if (!Quiet) gprint (GP_ERR, "dchisq: %f, Ndof: %d\n", dchisq, Npts - Npar);
   }  
-  if (!Quiet) fprintf (stderr, "%d iterations\n", i); 
+  if (!Quiet) gprint (GP_ERR, "%d iterations\n", i); 
 
   for (i = 0; i < Npts; i++) {
@@ -79,5 +79,5 @@
     sprintf (name, "C%d", i);
     set_variable (name, par[i]);
-    if (!Quiet) fprintf (stderr, "%d  %f  %f\n", i, par[i], sqrt(covar[i][i]));
+    if (!Quiet) gprint (GP_ERR, "%d  %f  %f\n", i, par[i], sqrt(covar[i][i]));
     sprintf (name, "dC%d", i);
     set_variable (name, sqrt(covar[i][i]));