From: Ian Beckwith Date: Tue, 19 Oct 2010 02:54:50 +0000 (+0100) Subject: control filters via $ENABLE_FILTER at the top of ID3FS::Path X-Git-Tag: debian/1.0-1~52 X-Git-Url: http://erislabs.net/gitweb/?p=id3fs.git;a=commitdiff_plain;h=d7f804cf3ba9dc0b9f74b5e9af976e74c91fcd32 control filters via $ENABLE_FILTER at the top of ID3FS::Path --- diff --git a/lib/ID3FS/Path.pm b/lib/ID3FS/Path.pm index fca5d95..e99a801 100644 --- a/lib/ID3FS/Path.pm +++ b/lib/ID3FS/Path.pm @@ -14,6 +14,8 @@ our $PATH_ALLTRACKS= "TRACKS"; our $PATH_NOARTIST = "NOARTIST"; our $PATH_NOALBUM = "NOALBUM"; +our $ENABLE_FILTER = 1; + sub new { my $proto=shift; @@ -92,7 +94,9 @@ sub dirents { @dents=qw(AND OR); } - push(@dents, $self->filter($PATH_ALLTRACKS, $PATH_NOARTIST)); + push(@dents, ($ENABLE_FILTER ? + $self->filter($PATH_ALLTRACKS, $PATH_NOARTIST) : + ($PATH_ALLTRACKS, $PATH_NOARTIST))); push(@dents, $self->artists()); } }