Index: branches/eam_branches/relastro.20100326/src/fitpoly.c
===================================================================
--- branches/eam_branches/relastro.20100326/src/fitpoly.c	(revision 27488)
+++ branches/eam_branches/relastro.20100326/src/fitpoly.c	(revision 27489)
@@ -146,7 +146,6 @@
     // ix, iy, vector[i][0], ix, iy, vector[i][1]);
   }	
-
-  status = dgaussjordan (matrix, vector, fit[0].Nelems, 2); 
-  if (!status) {
+  
+  if (!dgaussjordan (matrix, vector, fit[0].Nelems, 2)) {
     return (FALSE);
   }
