From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Tue, 7 Jan 2003 01:08:50 +0000 (+0000)
Subject: add ly:pitch-transpose rule
X-Git-Tag: release/1.7.11~1
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=950cb1d4272649ec5f9008d614d3ece14007f25b;p=lilypond.git

add ly:pitch-transpose rule
---

diff --git a/ChangeLog b/ChangeLog
index 6fce883f2a..9e67424fe9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2003-01-07  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+	* VERSION: release 1.7.11
+
+	* scripts/convert-ly.py: add ly:pitch-transpose rule
+
 2003-01-07  Jan Nieuwenhuizen  <janneke@gnu.org>
 
 	* scm/double-plus-new-chord-name.scm
diff --git a/scripts/convert-ly.py b/scripts/convert-ly.py
index f4689e1d8e..851916ba0e 100644
--- a/scripts/convert-ly.py
+++ b/scripts/convert-ly.py
@@ -1123,6 +1123,14 @@ if 1:
 		return str
 	conversions.append (((1,7,10), conv, "\property ChordName #'style -> #(set-chord-name-style 'style)"))
 	
+
+
+if 1:
+	def conv(str):
+		str = re.sub (r"ly:transpose-pitch", "ly:pitch-transpose", str)
+		
+		return str
+	conversions.append (((1,7,11), conv, "transpose-pitch -> pitch-transpose"))
 	
 
 ################################