$delete_genre, $genre, $add_tags, $delete_tags, $overwrite_tagvals,
$delete_tagvals);
-Configure(qw(no_ignore_case));
+Configure(qw(bundling no_ignore_case));
my $optret=GetOptions(
"verbose|v" => \$verbose,
"help|h" => \$help,
my $donesomething=($delete_artist || $delete_album || $delete_track ||
$delete_tracknum || $delete_year || $delete_v1genre ||
$delete_comment || $delete_genre || $delete_tags ||
- $delete_tagvals);
+ $delete_tagvals || $overwrite_tagvals);
return($donesomething ? 1 : 0);
}
defined($track) || defined($tracknum) ||
defined($year) || defined($v1genre) ||
defined($comment) || defined($genre) ||
- defined($add_tags));
+ defined($add_tags) || defined($overwrite_tagvals));
return( $donesomething ? 1 : 0 );
}