finish tags hierarchy schema change

[id3fs.git] / lib / ID3FS / AudioFile.pm

diff --git a/lib/ID3FS/AudioFile.pm b/lib/ID3FS/AudioFile.pm
index 59e0dfa..cac87d3 100644 (file)
--- a/lib/ID3FS/AudioFile.pm
+++ b/lib/ID3FS/AudioFile.pm
@@ -95,7 +95,12 @@ sub tags
        next unless(length($tag));
        next unless($tag =~ /\S+/);
        $tag=$self->sanitise($tag);
-       push(@outtags, [ split(/\s*\/\s*/, $tag) ]);
+       my ($tagname, $tagval)=($tag, undef);
+       if($tag=~/^([^\/]+)\/(.*)/)
+       {
+           ($tagname, $tagval)=($1, $2);
+       }
+       push(@outtags, [ $tagname, $tagval ]);
     }
     return @outtags;
 }