projects
/
id3fs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fixed delete_all
[id3fs.git]
/
lib
/
ID3FS
/
AudioFile
/
Mp3.pm
diff --git
a/lib/ID3FS/AudioFile/Mp3.pm
b/lib/ID3FS/AudioFile/Mp3.pm
index
d8f1355
..
d51e0b0
100644
(file)
--- a/
lib/ID3FS/AudioFile/Mp3.pm
+++ b/
lib/ID3FS/AudioFile/Mp3.pm
@@
-184,7
+184,7
@@
sub delete
{
my($self, $thing)=@_;
{
my($self, $thing)=@_;
- if(exists($self->{mp3}->{ID3v1}))
+ if(exists($self->{mp3}->{ID3v1})
&& $thing ne "genre"
)
{
my $action=$thing;
$action="genre" if($action eq "v1genre");
{
my $action=$thing;
$action="genre" if($action eq "v1genre");
@@
-200,6
+200,7
@@
sub delete
if(exists($self->{mp3}->{ID3v2}))
{
if(exists($self->{mp3}->{ID3v2}))
{
+ print "2: remove: $thing\n";
if($thing eq "artist")
{
$self->{mp3}->{ID3v2}->remove_frame("TPE1");
if($thing eq "artist")
{
$self->{mp3}->{ID3v2}->remove_frame("TPE1");