]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/tag-filter.ly
Adds glissando-skip property to the rhythmic-head-interface.
[lilypond.git] / input / regression / tag-filter.ly
index c73fd5b7175adb1c3d1e9bafb87e5d561045c2e3..324416642b571a3f8dc6faa85fc74db88ad0a70e 100644 (file)
@@ -1,8 +1,8 @@
 
-\version "2.1.22"
+\version "2.14.0"
 \header {
 
-texidoc = "The @code{\\tag} command marks music expressions with a
+  texidoc = "The @code{\\tag} command marks music expressions with a
 name. These tagged expressions can be filtered out later. This
 mechanism can be used to make different versions of the same music. In
 this example, the top stave displays the music expression with all
@@ -11,43 +11,43 @@ notes and fingerings, but the score has not."
 
 }
 
-\paper { raggedright= ##t }
+\layout { ragged-right= ##t }
 
 common =
-\notes \relative c''  {
-
-    c1
-    \relative c' <<
-       \tag #'part <<
-         R1 \\
-         {
-             \set fontSize =  #-1
-             c4_"cue" f2 g4 } 
-        >>
-       \tag #'score R1
-     >>
-    c1-\tag #'part ^4
+\relative c''  {
+
+  c1
+  \relative c' <<
+    \tag #'part <<
+      R1 \\
+      {
+       \set fontSize = #-1
+       c4_"cue" f2 g4 } 
+    >>
+    \tag #'score R1
+  >>
+  c1-\tag #'part ^4
 }
 
 
-\score {
-    \notes \simultaneous { 
-    \new Staff {
-       \set Staff.instrument =  #"both"
-       \common
-       }
-    \new Staff {
-       \set Staff.instrument =  #"part"
-       \apply #(remove-tag 'score) \common
-       }
-    \new Staff {
-       \set Staff.instrument =  #"score"
-       \apply #(remove-tag 'part) \common
-       }
-    }
+
+\simultaneous { 
+  \new Staff {
+    \set Staff.instrumentName = #"both"
+    \common
+  }
+  \new Staff {
+    \set Staff.instrumentName = #"part"
+    \keepWithTag #'part \common
+  }
+  \new Staff {
+    \set Staff.instrumentName = #"score"
+    \keepWithTag #'score \common
+  }
 }
 
 
 
 
 
+