fix id3v2 tag writing weirdness
authorIan Beckwith <ianb@erislabs.net>
Mon, 1 Nov 2010 03:40:59 +0000 (03:40 +0000)
committerIan Beckwith <ianb@erislabs.net>
Mon, 1 Nov 2010 03:40:59 +0000 (03:40 +0000)
lib/ID3FS/AudioFile/Mp3.pm

index b4f340c..423737c 100644 (file)
@@ -133,7 +133,14 @@ sub add_tags
 sub write
 {
     my $self=shift;
-    $self->{mp3tag}->update_tags();
+    if(exists($self->{mp3tag}->{ID3v1}))
+    {
+       $self->{mp3tag}->{ID3v1}->write_tag;
+    }
+    if(exists($self->{mp3tag}->{ID3v2}))
+    {
+       $self->{mp3tag}->{ID3v2}->write_tag;
+    }
 }
 
 sub delete_artist   { shift->delete("artist");  }