(conv): dashes rule.

[lilypond.git] / input / test / textscript.ly

diff --git a/input/test/textscript.ly b/input/test/textscript.ly
index 8937ff889b91bec9cd65193ec48fdaba10515fdd..710d88f03754a2b8800b314d4e042a4e2ce4965e 100644 (file)
--- a/input/test/textscript.ly
+++ b/input/test/textscript.ly
@@ -1,22 +1,19 @@
-\version "1.3.146"
+#(ly:set-option 'old-relative)
+\version "1.9.1"
 
-
-%
-% Test font selection and scm text markup
-%
+\header { texidoc = "@cindex Textscript
+Test font selection and scm text markup. "
+}
 
 \score{
   \notes\relative c''{
-    c'1^#'(columns (dynamic "p") " ma sosten.") 
-    c^#'(bold "ABCD")
-    c^#'(columns "Dal " (music "scripts-segno")) 
-    c^#'(Large "ABCD") 
-    \break
     \property Voice . TextScript \override #'font-shape = #'upright
-    c1^#'(columns (dynamic "p") " ma sosten.")  
-    c^#'(bold "ABCD")
+    c1^\markup { \dynamic "p" "ma sosten." }  
+    c^\markup \huge "ABCD" 
     \property Voice . TextScript \override #'font-series = #'bold
-    c^#'(columns "Dal " (music "scripts-segno")) 
-    c^#'(Large "ABCD")
+    c^\markup { \bold "Dal" " " \raise #0.8 \musicglyph #"scripts-segno" }
+    c^\markup \huge "ABCD"
   }
+       \paper{ }
 }
+