next;
}
my $file=ID3FS::AudioFile->new($filename);
+ next unless($file);
my $changes=0;
$changes = do_deletes($file);
$changes += do_adds($file);
$file->delete_year() if($delete_year);
$file->delete_v1genre() if($delete_v1genre);
$file->delete_comment() if($delete_comment);
- $file->delete_genre() if($delete_genre);
+ $file->delete_genre() if($delete_genre || $genre);
$file->delete_tags($delete_tags, 0) if($delete_tags);
$file->delete_tags($delete_tagvals, 1) if($delete_tagvals);
$file->delete_tags($overwrite_tagvals, 1) if($overwrite_tagvals);
- my $donesomething=($delete_artist || $delete_album || $delete_track ||
- $delete_tracknum || $delete_year || $delete_v1genre ||
- $delete_comment || $delete_genre || $delete_tags ||
- $delete_tagvals || $overwrite_tagvals);
+ my $donesomething=($delete_artist || $delete_album || $delete_track ||
+ $delete_tracknum || $delete_year || $delete_v1genre ||
+ $delete_comment || $delete_genre || $delete_tags ||
+ $delete_tagvals || defined($genre) || $overwrite_tagvals);
return($donesomething ? 1 : 0);
}
$file->year($year) if($year);
$file->v1genre($v1genre) if($v1genre);
$file->comment($comment) if($comment);
- $file->genre($genre) if($genre);
$file->add_tags($add_tags) if($add_tags);
+ $file->add_tags($genre) if($genre);
$file->add_tags($overwrite_tagvals) if($overwrite_tagvals);
my $donesomething=(defined($artist) || defined($album) ||
sub track { return(shift->set("track", @_)); }
sub tracknum { return(shift->set("tracknum", @_)); }
sub v1genre { return(shift->set("v1genre", @_)); }
-sub genre { return(shift->set("genre", @_)); }
sub comment { return(shift->set("comment", @_)); }
sub audiotype { return(shift->set("audiotype")); }
sub haspic { return(shift->set("haspic")); }