fix indexing files in root of tree
authorIan Beckwith <ianb@erislabs.net>
Wed, 6 Oct 2010 01:26:39 +0000 (02:26 +0100)
committerIan Beckwith <ianb@erislabs.net>
Wed, 6 Oct 2010 01:27:02 +0000 (02:27 +0100)
lib/ID3FS/DB.pm

index 96b88f9..bbb1be5 100644 (file)
@@ -539,7 +539,7 @@ sub add
     my $relpath=$path;
     $relpath =~ s/^\Q$self->{base}\E\/?//;
     my($filepart,$pathpart);
-    if($path !~ /\//)
+    if($relpath !~ /\//)
     {
        $pathpart='';
        $filepart=$relpath;