]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/markup-note-styles.ly
Merge remote-tracking branch 'origin' into translation
[lilypond.git] / input / regression / markup-note-styles.ly
index c24c6d43b7d3d41c474313c6a6a868e7731845c2..f5fbc9b60d2671170f61920fbf415b857e78e8b7 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.17.12"
+\version "2.17.19"
 
 \header {
   texidoc = "@code{\\note-by-number} and @code{\\note} support
@@ -37,7 +37,7 @@ all note head styles and straight flags."
 
 \markup {
   \column {
-    \vspace #1
+    \combine \null \vspace #1
     \underline "Note-head-styles:"
     \override #'(baseline-skip . 6)
     \show-note-styles #styles-list
@@ -46,7 +46,7 @@ all note head styles and straight flags."
 
 \markup {
   \column {
-    \vspace #1
+    \combine \null \vspace #1
     \underline "Modern-straight-flag:"
     \override #'(flag-style . modern-straight-flag)
     \show-note-styles #'(default)
@@ -55,9 +55,18 @@ all note head styles and straight flags."
 
 \markup {
   \column {
-    \vspace #1
+    \combine \null \vspace #1
     \underline "Old-straight-flag:"
     \override #'(flag-style . old-straight-flag)
     \show-note-styles #'(default)
   }
 }
+
+\markup {
+  \column {
+    \combine \null \vspace #1
+    \underline "Flat-flag:"
+    \override #'(flag-style . flat-flag)
+    \show-note-styles #'(default)
+  }
+}