[Vegan-commits] r372 - pkg/R

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

Author: jarioksa
Date: 2008-05-27 17:49:32 +0200 (Tue, 27 May 2008)
New Revision: 372

Modified:
   pkg/R/mso.R
Log:
cleanup in mso

Modified: pkg/R/mso.R
===================================================================
--- pkg/R/mso.R	2008-05-26 15:32:11 UTC (rev 371)
+++ pkg/R/mso.R	2008-05-27 15:49:32 UTC (rev 372)
@@ -4,9 +4,8 @@
     object <- object.cca
     xy <- object.xy
     N <- nrow(object$CA$Xbar)
-    if (class(object) == "rda") 
+    if (inherits(object, "rda")) 
         N <- 1
-    require(vegan)
     Dist <- dist(xy)
     object$grain <- grain
     if (round.up)