X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mutopia%2FCoriolan%2Fcorni.ly;h=b4fe792cc642cac05b41888069cdfdcc24a84021;hb=refs%2Ftags%2Frelease%2F1.3.132;hp=7db4bc7308a27f155fd8846780b3dd6da24f0d89;hpb=64dbfeeee49c65d8c7141a51251cdb70aa187bd2;p=lilypond.git

diff --git a/mutopia/Coriolan/corni.ly b/mutopia/Coriolan/corni.ly
index 7db4bc7308..b4fe792cc6 100644
--- a/mutopia/Coriolan/corni.ly
+++ b/mutopia/Coriolan/corni.ly
@@ -1,34 +1,22 @@
-\header{
-filename =	 "corni.ly";
-% %title =	 "Ouvert\\"ure zu Collins Trauerspiel \\"Coriolan\\" Opus 62";
-description =	 "";
-composer =	 "Ludwig van Beethoven (1770-1827)";
-enteredby =	 "JCN";
-copyright =	 "public domain";
 
-
-}
-
-\version "1.3.4";
+\version "1.3.120";
 
 \include "corno-1.ly"
 \include "corno-2.ly"
 
-$corni_staff = \context Staff = corni <
+corniStaff = \context Staff = corni <
 	\property Staff.midiInstrument = #"french horn"
-	\property Staff.instrument = #"2 Corni (E\\textflat)"
-	\property Staff.instr = #"Cor. (E\\textflat)"
-	% urg: can't; only My_midi_lexer:<non-static> () parses pitch?
-	%\property Staff.transposing = "es"
+
+	\property Staff.instrument = #`(lines
+	  "2 Corni" (rows "(E" ,text-flat ")"))
+	
+	\property Staff.instr = #`(lines "Cor."  (rows "(E" ,text-flat ")"))
 	\property Staff.transposing = #3
-	%\notes \context Voice=corni < 
-	\notes \context Staff=corni < 
-		\time 4/4;
-		\skip 1*341; \bar "|.";
-		\context VoiceOne=cornoi
-			\$corno1
-		\context VoiceTwo=cornoii
-			\$corno2
-	>
+	\Time
+	\notes { \key c \major; }
+	\End
+	\context Voice=one \partcombine Voice
+		\context Thread=one \cornoI
+		\context Thread=two \cornoII
 >