]> git.donarmstrong.com Git - lilypond.git/blob - input/test/boxed-molecule.ly
cleanup. Separate into internal
[lilypond.git] / input / test / boxed-molecule.ly
1
2 \version "2.1.21"
3 \header {
4 texidoc = "@cindex Boxed Molecule
5 You can override the molecule callback to draw a box around
6 arbitrary grobs. " }
7
8
9  \score { \notes \relative c''  {
10
11  \property Voice.TextScript \override #'print-function =
12    #(make-molecule-boxer 0.1 0.3 0.2 brew-new-markup-molecule)
13
14    c'4^"foo"
15
16 \property Voice.Stem \override #'print-function =
17    #(make-molecule-boxer 0.05 0.25 0.25 Stem::brew_molecule)
18
19 \property Score.RehearsalMark \override #'print-function =
20    #(make-molecule-boxer 0.15 0.3 0.3 brew-new-markup-molecule)
21       c8
22 \property Voice.Stem \revert #'print-function
23
24       c4. c4 \mark "F" c1 
25    }
26 \paper{raggedright = ##t}
27 }
28