2 % Test new font selection and scm text markup
9 c-\textscript #'(bold "textb")
10 d-\textscript #'(lines "een" "twee" "drie")
11 e-\textscript #'(lines (bold "een")
12 (rows "en" "dat" "is" ((family . "number") "2"))
14 f-\textscript #'(finger "3")
15 g-\textscript #'(music (named "noteheads-2"))
21 TextScript \push #'style-sheet = #'paper16
22 TextScript \push #'font-family = #'roman
23 TextScript \pop #'no-spacing-rods
24 TextScript \push #'direction = #1