From ea99a9334d29647cbe1f8f7d2c7a8ff02d0bdd5c Mon Sep 17 00:00:00 2001 From: Reinhold Kainhofer <reinhold@kainhofer.com> Date: Fri, 23 Jul 2010 01:04:32 +0200 Subject: [PATCH] Code formatting nitpick --- pae2xml.pl | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/pae2xml.pl b/pae2xml.pl index 1e2d280..7853b3b 100755 --- a/pae2xml.pl +++ b/pae2xml.pl @@ -422,14 +422,12 @@ sub parse_notes { </notations> </note> '; - } - elsif ($notes =~ s/(\d+\.*)\(({?(g|q)?(\,|\')*(x|xx|b|bb|n)?\d*\.*(\-|A|B|C|D|E|F|G)t?\+?}?)\)/\($1$2\)/gs) { # pull duration into fermata parentheses + } elsif ($notes =~ s/(\d+\.*)\(({?(g|q)?(\,|\')*(x|xx|b|bb|n)?\d*\.*(\-|A|B|C|D|E|F|G)t?\+?}?)\)/\($1$2\)/gs) { # pull duration into fermata parentheses # print "after replacement: $notes\n"; exit; } elsif ($notes =~ /^ +(.*)$/) { $notes = $1; print("Invalid space encountered in notes before $notes\n"); - } - else { + } else { print_error("got stuck with $notes\n"); $notes = ""; } -- GitLab