[Phylobase-commits] r515 - pkg/R

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

Author: bbolker
Date: 2009-08-19 22:53:05 +0200 (Wed, 19 Aug 2009)
New Revision: 515

Modified:
   pkg/R/treePlot.R
Log:
  fix tip label ordering in phylobubbles



Modified: pkg/R/treePlot.R
===================================================================
--- pkg/R/treePlot.R	2009-08-19 20:17:56 UTC (rev 514)
+++ pkg/R/treePlot.R	2009-08-19 20:53:05 UTC (rev 515)
@@ -414,7 +414,8 @@
             layout.pos.col = 2, 
             layout.pos.row = 1
         ))
-        grid.text(phy at tip.label, 0.1, tys, just = 'left')
+        tt <- tipLabels(phy)
+        grid.text(tt, 0.1, tys, just = 'left')
         upViewport()
     }
     pushViewport(viewport(