diff --git a/pae2xml.pl b/pae2xml.pl index 7df2f2436ff68b48ed120776ed5791c6d4ca431d..5749a4e0feae05ee47d4917bbea7ce6ec6106bf0 100755 --- a/pae2xml.pl +++ b/pae2xml.pl @@ -479,7 +479,7 @@ sub parse_note { '; } if ($gracecue eq "q" || $in_qq_group) { - print OUT ' <cue/> + print OUT ' <grace/> '; } if ($pitch eq "-") { diff --git a/sample_files/Grace-appoggiaturaa.pae b/sample_files/Grace-appoggiaturaa.pae new file mode 100644 index 0000000000000000000000000000000000000000..a582681140488ecf5eedf67d2c442af6d9a1f460 --- /dev/null +++ b/sample_files/Grace-appoggiaturaa.pae @@ -0,0 +1,7 @@ +Test Composer +Test case for appoggiatura +1.1.1: S appoggiatura +plain&easy: %G-2@c� '2Aq''8C{'8AG}4A/ + +Test Library +00000000 \ No newline at end of file diff --git a/sample_files/Grace-double-appoggiatura.pae b/sample_files/Grace-double-appoggiatura.pae new file mode 100644 index 0000000000000000000000000000000000000000..d31fa2cb0602a9e76e81655059348b2a6517daa8 --- /dev/null +++ b/sample_files/Grace-double-appoggiatura.pae @@ -0,0 +1,7 @@ +Test Composer +Test case for double appoggiatura +1.1.1: S double appoggiatura +plain&easy: %G-2@c� '2Aqq{6B''C}r{8D'B}''4C/ + +Test Library +00000000 \ No newline at end of file