From: Ian Beckwith Date: Mon, 18 Oct 2010 14:47:53 +0000 (+0100) Subject: remove debug code X-Git-Tag: debian/1.0-1~56 X-Git-Url: http://erislabs.net/gitweb/?p=id3fs.git;a=commitdiff_plain;h=fd9288aa5f531435e0577c56e49ca58a35f1cac0 remove debug code --- diff --git a/lib/ID3FS/Path.pm b/lib/ID3FS/Path.pm index e81f585..01831fc 100644 --- a/lib/ID3FS/Path.pm +++ b/lib/ID3FS/Path.pm @@ -680,8 +680,6 @@ sub tags_subselect my $tree=$self->{tagtree}; # FIXME print "UNDEF!!\n" unless($self->{tagtree}); - use Data::Dumper; - print Dumper $self->{tagtree}; my $parent=$self->trailing_tag_parent(); # print "ELEMENTS: ", join('/', map { $_->{name}; } @{$self->{elements}}), "\n"; @@ -694,7 +692,7 @@ sub tags_subselect } my ($sqlclause, @joins)=(undef, ()); ($sqlclause, @joins) = $tree->to_sql($hasvals) if($tree); - print "SQL(" . scalar(@joins) .": $sqlclause\n"; +# print "SQL(" . scalar(@joins) ."): $sqlclause\n"; my $sql="\tSELECT fxt1.files_id FROM tags t1"; my @crosses=(); my @inners=();