[Phylobase-commits] r340 - pkg/R

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

Author: bbolker
Date: 2008-12-19 21:32:05 +0100 (Fri, 19 Dec 2008)
New Revision: 340

Modified:
   pkg/R/phylo4.R
Log:
  fix nodeId generic definition




Modified: pkg/R/phylo4.R
===================================================================
--- pkg/R/phylo4.R	2008-12-19 20:25:10 UTC (rev 339)
+++ pkg/R/phylo4.R	2008-12-19 20:32:05 UTC (rev 340)
@@ -65,7 +65,7 @@
                standardGeneric("nodeLabels<-")
            })
 
-setGeneric("nodeId", function(x,which) {
+setGeneric("nodeId", function(x,which=c("internal","tip","all")) {
     standardGeneric("nodeId")
 })