release: 1.3.60

[lilypond.git] / input / test / noteheadstyle.ly

diff --git a/input/test/noteheadstyle.ly b/input/test/noteheadstyle.ly
index df11fef63f19a6a6f1477c4dd621fe8fd1ee76d7..0ec56ee0ccd1ac03cda10f3af8d8dbb2e4abc430 100644 (file)
--- a/input/test/noteheadstyle.ly
+++ b/input/test/noteheadstyle.ly
@@ -1,43 +1,43 @@
 \score { \notes \relative c{
-c''4 c2 c8  c16 c16 c1 
-\property Voice.noteHeadStyle = "diamond"
-c4 c2 c8  c16 c16  c1
-\property Voice.noteHeadStyle = "transparent"
-c4 c2 c8  c16 c16  c1
-\property Voice.noteHeadStyle = "cross"
-c4 c2 c8  c16 c16  c1
-\property Voice.noteHeadStyle = "harmonic"
-c4 c2 c8  c16 c16  c1
+c''4 c2 c8  c16 c16 c1 c\breve 
+\property Voice.noteHeadStyle = #'diamond
+c4 c2 c8  c16 c16  c1 c\breve
+\property Voice.noteHeadStyle = #'transparent
+c4 c2 c8  c16 c16  c1 c\breve
+\property Voice.noteHeadStyle = #'cross
+c4 c2 c8  c16 c16  c1 c\breve
+\property Voice.noteHeadStyle = #'mensural
+c4 c2 c8  c16 c16  c1 c\breve c\longa
+\property Voice.noteHeadStyle = #'harmonic
+c4 c2 c8  c16 c16  c1 c\breve
+\property Voice.noteHeadStyle = #'baroque
+c4 c2 c8  c16 c16  c1 c\breve c\longa
 
-   \context ThreadedVoice <
+   \context Voice <
     \context Thread = TA
-      { \property Thread.noteHeadStyle = "cross"
-        \property ThreadedVoice.ydirection = \up c16} 
+      { \property Thread.noteHeadStyle = #'cross
+        \property Voice.verticalDirection = \up c16} 
     \context Thread = TB
-      { \property Thread.noteHeadStyle = "" a16  }
+      { \property Thread.noteHeadStyle = #'default a16  }
     
     \context Thread = TC
-      { \property Thread.noteHeadStyle = "harmonic" d16 }
+      { \property Thread.noteHeadStyle = #'mensural d16 }
     
   >
+
+  
+   \context Voice <\context Thread = TA {
+   \property Thread.noteHeadStyle = #'default
+   c4 c4 }
+\context Thread = TB {
+  \property Thread.noteHeadStyle = #'mensural
+  c'4 \stemdown c
+} >
+
 }
 
     \paper {
-        \translator {
-         \VoiceContext
-         \remove Note_heads_engraver;
-         \accepts Thread;
-         \name ThreadedVoice;
-       }
-       \translator {
-         \StaffContext
-         \accepts ThreadedVoice;
-       }
-       \translator {
-         \type Engraver_group_engraver;
-         \consists Note_heads_engraver;
-         \name Thread;
-       }
+       
     }
 }
-\version "1.0.16"; 
+\version "1.3.59";