From e4fb6406212b7adb92d5963ae1bc156f0d43e46d Mon Sep 17 00:00:00 2001
From: Ian Beckwith <ianb@erislabs.net>
Date: Tue, 19 Oct 2010 15:47:50 +0100
Subject: [PATCH] remove more dead code

---
 lib/ID3FS/Path.pm      |  2 --
 lib/ID3FS/Path/Node.pm | 27 ---------------------------
 2 files changed, 29 deletions(-)

diff --git a/lib/ID3FS/Path.pm b/lib/ID3FS/Path.pm
index 8dcdd52..dc5ea7e 100644
--- a/lib/ID3FS/Path.pm
+++ b/lib/ID3FS/Path.pm
@@ -704,8 +704,6 @@ sub tags_subselect
     my $tree=$self->{tagtree};
     my $parent=$self->trailing_tag_parent();
 
-#    print "ELEMENTS: ", join('/', map { $_->{name}; } @{$self->{elements}}), "\n";
-#    print "TREE: ", $tree->print(), "\n";
     my $tag=undef;
     if($hasvals)
     {
diff --git a/lib/ID3FS/Path/Node.pm b/lib/ID3FS/Path/Node.pm
index bdc403f..3775d38 100644
--- a/lib/ID3FS/Path/Node.pm
+++ b/lib/ID3FS/Path/Node.pm
@@ -57,31 +57,6 @@ sub type       { return shift->set("type",       shift); }
 sub id         { return shift->set("id",         shift); }
 sub parents_id { return shift->set("parents_id", shift); }
 
-sub print
-{
-    my($self)=@_;
-    my $op=$self->name();
-    my $left=$self->left();
-    my $right=$self->right();
-    return "" unless($left || $right);
-    my $str .= $self->print_node($left);
-    $str .= (" " . $op . " ") if($op);
-    $str .= $self->print_node($right);
-    if($op || ($left && $right))
-    {
-	$str="(" . $str . ")";
-    }
-    return $str;
-}
-
-sub print_node
-{
-    my($self, $node)=@_;
-    return "" unless(defined($node));
-    return $node->print() if(ref($node) eq "ID3FS::Path::Node");
-    return $node->{name};
-}
-
 sub to_sql
 {
     my($self, $hasvals, $not, @joins)=@_;
@@ -147,8 +122,6 @@ sub to_sql
 		    push(@outjoins, "LEFT");
 		}
 	    }
-#	    print("LEFT: ", $left->print(), "\n") if ($left);
-#	    print("RIGHT: ", $right->print(), "\n") if($right);
 	}
 	elsif($op eq "OR")
 	{
-- 
2.11.0