]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/bagpipe.ly
.ly version update.
[lilypond.git] / input / test / bagpipe.ly
index 98297007ec336d47be850194a77c073dbe77c97c..9a9d6048eb29f857279650adc9fc126beabc208b 100644 (file)
@@ -1,4 +1,4 @@
-\version "1.9.2"
+\version "1.9.8"
 
 \header {
  texidoc = "@cindex Bagpipe Music
@@ -6,9 +6,6 @@ Here's an example of bagpipe music.
 "
 }
 
-#(add-to-grace-init "Voice" 'Stem 'length 6)
-#(add-to-grace-init "Voice" 'Stem 'stroke-style '())
-
 % doen't work??  
 %#(add-to-grace-init "Voice" 'Stem 'font-relative-size )
 
@@ -51,6 +48,11 @@ gcdg =  \notes{ \grace {  g'32[ c d]}}
 % 
 \score {
   \notes  { \time 6/8 \partial 4
+
+ #(add-grace-property 'Voice 'Stem 'length 6)
+ #(add-grace-property 'Voice 'Stem 'stroke-style '())
+
+           
   \tieUp
   \slurUp
 f4 |