From 8b6723f4bbc46d2d77cc2594b177580861ec4d48 Mon Sep 17 00:00:00 2001
From: gjuggler <greg@ebi.ac.uk>
Date: Mon, 7 Feb 2011 22:32:51 +0000
Subject: [PATCH] Tiny fix to ascii print method.

---
 Bio/Tree/TreeFunctionsI.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Bio/Tree/TreeFunctionsI.pm b/Bio/Tree/TreeFunctionsI.pm
index 494f0aa585..c5b3785c94 100644
--- a/Bio/Tree/TreeFunctionsI.pm
+++ b/Bio/Tree/TreeFunctionsI.pm
@@ -88,8 +88,8 @@ Internal methods are usually preceded with a _
 package Bio::Tree::TreeFunctionsI;
 use strict;
 
-sub print_tree { print shift->ascii }
-sub ascii { shift->root->ascii }
+sub print_tree { print shift->ascii(@_) }
+sub ascii { shift->root->ascii(@_) }
 
 sub get_lineage_nodes {
     my $self = shift;