]> git.donarmstrong.com Git - lilypond.git/blob - input/test/no-span.ly
patch::: 1.3.18.jcn3
[lilypond.git] / input / test / no-span.ly
1 %% why non of this any effect?
2 #(define Span_bar_engraver-visibility #f)
3 #(define Staff_group_bar_engraver-visibility #f)
4 #(define Span_score_bar_engraver-visability #f)
5
6 #(assoc-set! bar-break-glyph-alist "bracket" '(nil . nil))
7
8 \score{
9   \context Score <
10    \context StaffGroup<
11    \context PianoStaff <
12     \context Staff = treble {
13      \property Score.midiInstrument = "church organ"
14      <
15      \context Voice=i \notes\relative c { c c c c }
16      >
17     }
18     \context Staff = bass \notes\relative c { c c c c }
19    > 
20    \context Staff = pedal \notes\relative c { c c c c }
21    >
22   >
23 \paper {
24   textheight = 280.0 \mm;
25   \translator { 
26     \StaffGroupContext
27     minVerticalAlign = 4.0*\staffheight;
28     maxVerticalAlign = 4.0*\staffheight;
29 % this doesn't work
30     barType = #"|"
31    }
32    \translator { 
33     \PianoStaffContext
34         minVerticalAlign = 2.5*\staffheight;
35         maxVerticalAlign = 2.5*\staffheight;
36    }
37   }
38   \midi {
39    \tempo 4 = 69;
40   }
41 }