Issue 1388: Initial work to support opentype font features.

[lilypond.git] / input / regression / slur-script.ly

diff --git a/input/regression/slur-script.ly b/input/regression/slur-script.ly
index 17bdd371211763aaeed0e32a120605ef5c5bab9a..2047c50c6f16bbce56287246d8c51f10e7cfdc35 100644 (file)
--- a/input/regression/slur-script.ly
+++ b/input/regression/slur-script.ly
@@ -1,33 +1,22 @@
 
 \header {
 
-    texidoc = "A slur avoids collisions with scripts.  Only articulations
-    go inside the slur, dynamic markings, fingerings texts etc. go outside
-    of slur.
-
-    For different configurations, the scripts can be moved manually."
-    }
+  texidoc = "A slur avoids collisions with scripts, which are placed
+    either inside or outside the slur, depending on the script.  The
+    slur responds appropriately if a script is moved."
+}
 
-\version "2.3.7"
-\paper { raggedright = ##t }
+\version "2.19.21"
+\layout {
+  indent = 0\mm
+  ragged-right = ##t
+}
 \relative
 {
-    b4-.( b-. b-.)
-    
-    b(-.  d-.)
-    d(-.  b-.)
-    
-    b--( b-- b--)
-    b->( b-> b->)
-    b-.--( b-.-- b-.--)
-    b---.( b---. b---.)
-
-    b_1( b b_1_2_3)
-    c-1_\markup { \italic {"cresc."}}( f c)
-    c-1( f\f c)
-    c-1( c\f c)
-    \once \override Script #'padding = #1.2
-    b-.( b-.
-    \once \override Script #'padding = #1.2
-    b-.)
+  b4-.( b-.)
+  \once \override Script.padding = #1.5
+  b-.( b-.)
+  b_\downbow( b_\downbow)
+  \once \override Script.padding = #1.5
+  b_\downbow( b_\downbow)
 }