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

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

Author: gsimpson
Date: 2009-06-28 11:43:35 +0200 (Sun, 28 Jun 2009)
New Revision: 879

Modified:
   pkg/vegan/R/panel.ordi.R
Log:
add 'code' to arg list of panel.arrows as 'code' was being used undefined.

Modified: pkg/vegan/R/panel.ordi.R
===================================================================
--- pkg/vegan/R/panel.ordi.R	2009-06-28 09:34:43 UTC (rev 878)
+++ pkg/vegan/R/panel.ordi.R	2009-06-28 09:43:35 UTC (rev 879)
@@ -25,7 +25,8 @@
 ## needed for "arrows" %in% type
 panel.ordiarrows <-
 function(x, y, subscripts,
-         ends = "last", type = "open", length = 0.25, angle = 30, ...)
+         ends = "last", type = "open", length = 0.25, angle = 30, code = 2,
+         ...)
 {
     n <- length(x)
     panel.arrows(x[-n], y[-n], x[-1], y[-1], ends = ends, type = "open",