fixed warning

master
charlie 2016-03-29 07:20:31 -04:00
parent 669a674c2b
commit 99711de9a9
1 changed files with 1 additions and 1 deletions

View File

@ -159,7 +159,7 @@ sub items{
($temp, $dom, $temp2) = /( |^)(5|7|9|11|13)th( |$)/i;
}
my %mod_hash = (sharp => 1, b => -1);
if (defined $mod) {
if (!defined $mod) {
$mod = $mod_hash{$mod} || 0;
}
if(defined $chord && ($chord eq "m" || $chord =~ /(min|minor)/i)){