From f0b2526132b6518dcc58299e437c02373cf55823 Mon Sep 17 00:00:00 2001
From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Sat, 17 Jul 2010 19:25:47 +0200
Subject: [PATCH] Write out a warning that neumic notation is not supported by
 MusicXML

---
 pae2xml.pl                        | 3 +++
 sample_files/Durations-neumic.pae | 7 +++++++
 2 files changed, 10 insertions(+)
 create mode 100644 sample_files/Durations-neumic.pae

diff --git a/pae2xml.pl b/pae2xml.pl
index 7f82c91..eaec39e 100755
--- a/pae2xml.pl
+++ b/pae2xml.pl
@@ -582,6 +582,9 @@ sub notehead {
 
 sub duration {
   my ($duration, $dots) = @_;
+  if ($duration.$dots eq "7.") {
+    print_error ("Neumic notation is not supported by MusicXML!");
+  }
 
   if ($duration.$dots ne "") {
     my %du=("1",4*$divisions,"2",2*$divisions,"4",$divisions,
diff --git a/sample_files/Durations-neumic.pae b/sample_files/Durations-neumic.pae
new file mode 100644
index 0000000..d382530
--- /dev/null
+++ b/sample_files/Durations-neumic.pae
@@ -0,0 +1,7 @@
+Test Composer
+Test case for neumic durations
+1.1.1: S neumic durations
+plain&easy: %G-2@c$� '4C7.D
+
+Test Library
+00000000
\ No newline at end of file
-- 
GitLab