5 Please don't use this Scheme hacking unless you have a good reason.
6 Support for the \property textExtraOffset will not go into LilyPond in
9 I think extra-offset will stay - but perhaps I'll change the name
14 #(set! generic-thread-properties
16 generic-thread-properties
20 (list 'textExtraOffset pair? 'extra-offset)
25 (list 'scriptExtraOffset pair? 'extra-offset)
35 \notes \context Voice <
36 \context Thread = TA { c'4_1 }
37 \context Thread = TB {
38 \property Thread.scriptHorizontal = ##t
39 \property Thread.textExtraOffset = #'(-0.5 . -0.5)
40 \property Thread.scriptExtraOffset = #'(2.25 . -0.5)
42 \context Thread = TC { g'4^4 }
45 \paper { \translator {
47 \remove Script_engraver;
48 \remove Text_engraver;
53 Generic_property_list = #generic-thread-properties
54 \consists Script_engraver;
55 \consists Text_engraver;