X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ftext-script-vertical-skylines.ly;fp=input%2Fregression%2Ftext-script-vertical-skylines.ly;h=3657bc274d2be64891ca3219f8d091ee9b7f3964;hb=0ac07f31e0f95fc18e5916ce756b9c746af7cc58;hp=0000000000000000000000000000000000000000;hpb=2f1263e2ccdddcac2eb9f7d8ce2ed92867d3d160;p=lilypond.git

diff --git a/input/regression/text-script-vertical-skylines.ly b/input/regression/text-script-vertical-skylines.ly
new file mode 100644
index 0000000000..3657bc274d
--- /dev/null
+++ b/input/regression/text-script-vertical-skylines.ly
@@ -0,0 +1,23 @@
+\version "2.17.21"
+
+\header {
+  texidoc = "@code{TextScript}s are spaced closely, following outlines of
+the stencil.  When markup commands like @code{pad-around} and
+@code{with-dimensions} change the extent of a stencil, these changed
+extents have effect in the stencil outline used to place the resulting
+@code{TextScript}."
+}
+
+{
+  g'2^\markup { g \line {. . . .} }
+  e'^\markup { e }
+
+  g'2^\markup { g \transparent \line {. . . .} }
+  e'^\markup { e }
+
+  g'2^\markup { g \pad-around #0.5 \line{. . . .} }
+  e'^\markup { e }
+
+  g'2^\markup { g \with-dimensions #'(-0 . 0) #'(-0 . 0) \line {. . . .} }
+  e'^\markup { e }
+}