[adegenet-commits] r643 - pkg/R

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

Author: jombart
Date: 2010-05-21 16:31:27 +0200 (Fri, 21 May 2010)
New Revision: 643

Modified:
   pkg/R/basicMethods.R
Log:
Not a code issue, not my fault.
Maybe a code workaround still possible.
Method is found, but not used on Virion.
Works OK on windows VISTA and Linux 32 Debian testing.



Modified: pkg/R/basicMethods.R
===================================================================
--- pkg/R/basicMethods.R	2010-05-21 12:51:56 UTC (rev 642)
+++ pkg/R/basicMethods.R	2010-05-21 14:31:27 UTC (rev 643)
@@ -18,8 +18,7 @@
 # '[' operator
 ###############
 ## genind
-setMethod("[", "genind",
-          function(x, i, j, ..., loc=NULL, treatOther=TRUE, drop=FALSE) {
+setMethod("[", signature(x="genind", i="ANY", j="ANY", drop="ANY"), function(x, i, j, ..., loc=NULL, treatOther=TRUE, drop=FALSE) {
 
               if (missing(i)) i <- TRUE
               if (missing(j)) j <- TRUE
@@ -80,6 +79,9 @@
           })
 
 
+
+
+
 ## genpop
 setMethod("[", "genpop",
           function(x, i, j, ..., loc=NULL, treatOther=TRUE, drop=FALSE) {