X-Git-Url: https://erislabs.net/gitweb/?p=id3fs.git;a=blobdiff_plain;f=lib%2FID3FS%2FAudioFile%2FMp3.pm;fp=lib%2FID3FS%2FAudioFile%2FMp3.pm;h=8ec87ef5032353b8ebf1323d7a937ae64154513c;hp=7cd15b90998a9c5e5a00554d814875ae82284fd2;hb=9ef40433a1ba4044561f5941b07ba0d90a085942;hpb=f768e5fc4f33962bfac1142c546776cc0e239ec0 diff --git a/lib/ID3FS/AudioFile/Mp3.pm b/lib/ID3FS/AudioFile/Mp3.pm index 7cd15b9..8ec87ef 100644 --- a/lib/ID3FS/AudioFile/Mp3.pm +++ b/lib/ID3FS/AudioFile/Mp3.pm @@ -18,6 +18,7 @@ package ID3FS::AudioFile::Mp3; use strict; use warnings; +use ID3FS::AudioFile; use MP3::Tag; use MP3::Info; @@ -145,7 +146,7 @@ sub add_tags my($self, @tags)=@_; my $existing=$self->tags(); my @existing=split(/\s*,\s*/, $existing) if($existing); - my @merged=$self->uniq(@tags, @existing); + my @merged=ID3FS::AudioFile::uniq(@tags, @existing); my $genre=join(', ', @merged); return($self->set("genre", $genre)); } @@ -301,13 +302,6 @@ sub delete } } -sub uniq -{ - my ($self, @things)=@_; - my %hash=(); - @hash{@things}=(); - return(sort keys(%hash)); -} sub channels {