Mp3: filter extra slashes
authorIan Beckwith <ianb@erislabs.net>
Wed, 22 Sep 2010 21:57:06 +0000 (22:57 +0100)
committerIan Beckwith <ianb@erislabs.net>
Wed, 22 Sep 2010 21:57:06 +0000 (22:57 +0100)
lib/ID3FS/File/Mp3.pm

index c5dac34..8dbb76b 100644 (file)
@@ -42,6 +42,7 @@ sub choose
        warn("$self->{path}: no $func defined in ID3 tags\n") if($verbose);
        return undef;
     }
+    $thing=~s/\//-/g; # drop slashes
     return $thing;
 }
 
@@ -54,10 +55,13 @@ sub haspic    { return undef;               } # FIXME
 sub v1genre
 {
     my($self)=@_;
+    my $genre=undef;
     if(defined($self->{v1}))
     {
-       return $self->{v1}->genre();
+       $genre=$self->{v1}->genre();
+       $genre =~ s/\//-/g if(defined($genre));
     }
+    return $genre;
 }
 
 sub tags