Nitpick: ly:spanner-bound grob name slur -> spanner.
[lilypond.git] / input / regression / quote.ly
blob759a3d0a4fcfb8ce751b4c1bc7e77fda8cba1f45
1 \header
4 texidoc = "With @code{\\quote}, fragments of previously entered
5 music may be quoted. @code{quotedEventTypes} will determines what
6 things are quoted. In this example, a 16th rest is not quoted, since
7 @code{rest-event} is not in @code{quotedEventTypes}."
10 \version "2.12.0"
11 \layout {
12 ragged-right = ##t
16 quoteMe = \relative c' { fis4 r16 a8.-> b4-\ff c }
18 \addQuote quoteMe \quoteMe
19 original = \relative c'' { c8 d s2 es8 gis8 }
22 \new Staff {
23 \set Staff.instrumentName = "quoteMe"
24 \quoteMe
26 \new Staff {
27 \set Staff.instrumentName = "orig"
28 \original
30 \new Staff \relative c'' <<
31 \set Staff.instrumentName = "orig+quote"
32 \set Staff.quotedEventTypes = #'(note-event articulation-event)
33 \original
34 \new Voice {
36 \set fontSize = #-4
37 \override Stem #'length-fraction = #(magstep -4)
38 \quoteDuring #"quoteMe" { \skip 2. }