[GRASS-SVN] r36534 - grass/trunk/imagery/i.pca

[svn_grass at osgeo.org]

Author: martinl
Date: 2009-03-30 12:38:30 -0400 (Mon, 30 Mar 2009)
New Revision: 36534

Modified:
   grass/trunk/imagery/i.pca/support.c
Log:
i.pca: G_strcat() is not available in GRASS7


Modified: grass/trunk/imagery/i.pca/support.c
===================================================================
--- grass/trunk/imagery/i.pca/support.c	2009-03-30 16:16:06 UTC (rev 36533)
+++ grass/trunk/imagery/i.pca/support.c	2009-03-30 16:38:30 UTC (rev 36534)
@@ -52,16 +52,16 @@
 	sprintf(tmpeigen, "PC%d %9.2f (", i+1, eigval[i]);
 	for (j = 0; j < bands; j++) {
 	    sprintf(tmpa, "%7.4f", eigmat[i][j]);
-	    G_strcat(tmpeigen, tmpa);
+	    strcat(tmpeigen, tmpa);
 	    if (j < (bands - 1) ){
 		sprintf(tmpa, ",");
-		G_strcat(tmpeigen, tmpa);
+		strcat(tmpeigen, tmpa);
 	    }
 	}
-	G_strcat(tmpeigen, ")");
+	strcat(tmpeigen, ")");
 	
 	sprintf(tmpa, "[%.2f%%]", eigval[i] * 100/eigval_total);
-	G_strcat(tmpeigen, tmpa);
+	strcat(tmpeigen, tmpa);
 
 	sprintf(hist.edhist[i + 1], tmpeigen);