X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=R%2Fread.tree.R;h=47a432c39793e6b58ceef307e4248d588b1c6249;hb=b9e04a6e6af3beda74b916eda00b42ac38875563;hp=cba51d10fd7a5641568b12480006bc6c7635078e;hpb=1ad48c7a70983375138a6500372db588c8a3a134;p=ape.git

diff --git a/R/read.tree.R b/R/read.tree.R
index cba51d1..47a432c 100644
--- a/R/read.tree.R
+++ b/R/read.tree.R
@@ -1,8 +1,8 @@
-## read.tree.R (2010-09-27)
+## read.tree.R (2012-09-14)
 
 ##   Read Tree Files in Parenthetic Format
 
-## Copyright 2002-2010 Emmanuel Paradis, Daniel Lawson and Klaus Schliep
+## Copyright 2002-2012 Emmanuel Paradis, Daniel Lawson and Klaus Schliep
 
 ## This file is part of the R-package `ape'.
 ## See the file ../COPYING for licensing issues.
@@ -95,6 +95,7 @@ tree.build <- function(tp)
     if (any(nzchar(node.label))) obj$node.label <- node.label
     if (!is.na(root.edge)) obj$root.edge <- root.edge
     class(obj) <- "phylo"
+    attr(obj, "order") <- "cladewise"
     obj
 }