Issue 5167/6: Changes: show \markup xxx = ... \etc assignments

[lilypond.git] / input / regression / whiteout.ly

diff --git a/input/regression/whiteout.ly b/input/regression/whiteout.ly
index def544c1b641f3a8d876ceb47aaa7903776d27bb..543d94f369da04536a8fc13c3a88a0466871fac4 100644 (file)
--- a/input/regression/whiteout.ly
+++ b/input/regression/whiteout.ly
@@ -1,10 +1,13 @@
 \header {
 
-  texidoc = "The whiteout command underlays a white box under a
-markup.  "
+  texidoc = "The whiteout command underlays a white background under a
+markup.  The shape is determined by @code{whiteout-style}. The default
+is @code{box} which produces a rectangle.  @code{rounded-box} produces
+a rounded rectangle.  @code{outline} approximates the outline of the
+markup."
 
 }
-\version "2.19.21"
+\version "2.19.32"
 
 \paper
 {
@@ -14,5 +17,23 @@ markup.  "
 \relative {
   \override TextScript.layer = #'2
   \override TextScript.extra-offset = #'(2 . 4)
-  c''4-\markup  { \whiteout \pad-markup #0.5 foo } c
+  c''4-\markup { \whiteout foo } c
+  c-\markup { \whiteout \pad-markup #0.5 foo } c
+  c-\markup {
+    \override #'(thickness . 2)
+    \whiteout foo
+  }
+  c
+  c-\markup {
+    \override #'(thickness . 3)
+    \override #'(style . rounded-box)
+    \whiteout foo
+  }
+  c
+  c-\markup {
+    \override #'(thickness . 3)
+    \override #'(style . outline)
+    \whiteout foo
+  }
+  c
 }