diff --git a/pae2xml.pl b/pae2xml.pl index bc79762317a913b9eb4a64c52718c5b7f7f3968c..56ab32b0a6fd83d34d78ae872b456e1ef5528046 100755 --- a/pae2xml.pl +++ b/pae2xml.pl @@ -409,19 +409,8 @@ sub parse_notes { $mopen = 0; } $toprint .= "bar line\n"; - } #elsif ($notes =~ /^(\d*\.*\-)(.*)$/) { - #($rst, $notes) = ($1, $2); - #$toprint .= "rest: $rst\n"; - #$rst =~ /^(\d*)(\.*)\-$/; - #($rst, $dots) =($1,$2); - #print OUT ' <note> - # <rest /> - # <duration>'.duration($rst, $dots).'</duration> -#'.# <type>quarter</type> -#' -# </note> -#'; - elsif ($notes =~ /^\((\=)\)(.*)$/) { # a bar of rest with a fermata + + } elsif ($notes =~ /^\((\=)\)(.*)$/) { # a bar of rest with a fermata ($rst, $notes) = ($1, $2); $toprint .= "rest: $rst\n"; print OUT ' <note>