From e3341e1467687719d184f67cd1fafcf16488697b Mon Sep 17 00:00:00 2001
From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Mon, 19 Jul 2010 19:35:54 +0200
Subject: [PATCH] Remove commented code that is no longer needed
---
pae2xml.pl | 15 ++-------------
1 file changed, 2 insertions(+), 13 deletions(-)
diff --git a/pae2xml.pl b/pae2xml.pl
index bc79762..56ab32b 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>
--
GitLab