]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/quote-during.ly
Fix 787 for real this time (works for more than 2 scripts stacked)
[lilypond.git] / input / regression / quote-during.ly
1 \header
2 {
3
4     texidoc = "With @code{\\cueDuring} and @code{\\quoteDuring},
5 fragments of previously entered music may be
6 quoted. @code{quotedEventTypes} will determines what things are
7 quoted. In this example, a 16th rest is not quoted, since
8 @code{rest-event} is not in @code{quotedEventTypes}."
9
10 }
11 \version "2.12.0"
12 \layout {
13     ragged-right = ##t
14 }
15
16
17 quoteMe = \relative c' { fis4 r16  a8.-> b4-\ff c }
18
19 \addQuote quoteMe \quoteMe 
20 original = \relative c'' { c8 d s2 es8 gis8 }
21
22 <<
23     \new Staff {
24         \set Staff.instrumentName = "quoteMe"
25         \quoteMe
26     }
27     \new Staff {
28         \set Staff.instrumentName = "orig"
29         \original
30     }
31     \new Staff \relative c'' <<
32         
33         \set Staff.instrumentName = "orig+quote"        
34         \set Staff.quotedEventTypes = #'(note-event articulation-event)
35         \original
36         { s4 \quoteDuring #"quoteMe" { s2. } }
37     >>
38 >>