[Vegan-commits] r2532 - pkg/vegan/R

[noreply at r-forge.r-project.org]

Author: gsimpson
Date: 2013-06-20 21:16:48 +0200 (Thu, 20 Jun 2013)
New Revision: 2532

Modified:
   pkg/vegan/R/ordilabel.R
Log:
cleanup

Modified: pkg/vegan/R/ordilabel.R
===================================================================
--- pkg/vegan/R/ordilabel.R	2013-06-18 19:10:23 UTC (rev 2531)
+++ pkg/vegan/R/ordilabel.R	2013-06-20 19:16:48 UTC (rev 2532)
@@ -29,10 +29,6 @@
         else
             col <- par("fg")
     for (i in 1:nrow(x)) {
-        ## polygon(x[i,1] + c(-1,1,1,-1)*w[i], x[i,2] + c(-1,-1,1,1)*h[i],
-        ##         col = fill, border = border, xpd = xpd)
-        ## text(x[i,1], x[i,2], labels = labels[i], cex = cex, col = col,
-        ##      xpd = xpd, ...)
         ordiArgAbsorber(x[i,1] + c(-1,1,1,-1)*w[i], x[i,2] + c(-1,-1,1,1)*h[i],
                         col = fill, border = border, xpd = xpd,
                         FUN = polygon, ...)