From 172a3cc10609dd8745f3134562c8c2c65f16704d Mon Sep 17 00:00:00 2001
From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Sun, 18 Jul 2010 16:29:47 +0200
Subject: [PATCH] Fix appoggiaturas (use <grace> rather than <cue>)

---
 pae2xml.pl                                 | 2 +-
 sample_files/Grace-appoggiaturaa.pae       | 7 +++++++
 sample_files/Grace-double-appoggiatura.pae | 7 +++++++
 3 files changed, 15 insertions(+), 1 deletion(-)
 create mode 100644 sample_files/Grace-appoggiaturaa.pae
 create mode 100644 sample_files/Grace-double-appoggiatura.pae

diff --git a/pae2xml.pl b/pae2xml.pl
index 7df2f24..5749a4e 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 0000000..a582681
--- /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 0000000..d31fa2c
--- /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
-- 
GitLab