Imported Upstream version 2.14.2

[lilypond.git] / input / regression / glissando-index.ly

diff --git a/input/regression/glissando-index.ly b/input/regression/glissando-index.ly
new file mode 100644 (file)
index 0000000..3f3d662
--- /dev/null
+++ b/input/regression/glissando-index.ly
@@ -0,0 +1,14 @@
+% FIXME: this is a fake version number to allow git master
+% to compile.  See discussion on lilypond-devel.
+\version "2.14.0"
+
+\header {
+  texidoc = "Individual glissandi within a chord can be tweaked."
+}
+
+\relative c' {
+  \once \override Voice . Glissando #'style =
+    #(lambda (grob)
+       (if (eq? 1 (ly:grob-property grob 'glissando-index)) 'zigzag 'default))
+  <d f a>1 \glissando s1 <f a c>
+}