Making flat flags available

[lilypond.git] / input / regression / flags-straight.ly

diff --git a/input/regression/flags-straight.ly b/input/regression/flags-straight.ly
index 80eb28c7f63de3586aa10e22dc0da8eb295ffd18..7e96536e6adde60dd9c00e9bd945f2d9c6c58299 100644 (file)
--- a/input/regression/flags-straight.ly
+++ b/input/regression/flags-straight.ly
@@ -6,7 +6,7 @@
 
 
 % test notes, which will be shown in different styles:
-testnotes = { \autoBeamOff c'8 d'16 c'32 d'64 \acciaccatura {c'8} d'64 
+testnotes = { \autoBeamOff c'8 d'16 c'32 d'64 \acciaccatura {c'8} d'64
    c''8 d''16 c''32 d''64 \acciaccatura {\stemDown c''8 \stemNeutral} d''64  }
 
 {
@@ -19,9 +19,13 @@ testnotes = { \autoBeamOff c'8 d'16 c'32 d'64 \acciaccatura {c'8} d'64
   \mark "old straight (large angles)"
   \override Flag.stencil = #old-straight-flag
   \testnotes
+
+  \mark "flat"
+  \override Flag.stencil = #flat-flag
+  \testnotes
 %
 %   \mark "custom slant"
-% %   Custom straight flag. The parameters are: 
+% %   Custom straight flag. The parameters are:
 % %                flag thickness and spacing
 % %                up-flag angle and length
 % %               down-flag angle and length