1\version "2.21.0"
2
3\header {
4  texidoc = "The @code{\\quoteDuring} command shall also quote correctly all
5  @code{\\override}, @code{\\once \\override}, @code{\\revert}, @code{\\set},
6  @code{\\unset} and @code{\\tweak} events. The first line contains the
7  original music, the second line quotes the whole music and should look
8  identical.
9
10  By default, not all events are quoted. By setting the quoted event types to
11  @code{'(StreamEvent)}, everything should be quoted."
12}
13
14mus = \relative {
15  % Acciaccaturas contain a slur and  \override Flag.stroke-style
16  % Thus, we're checking \override here
17  c'4 \acciaccatura d8 c4
18  % Checking \set and \unset
19  \set fontSize = #6 f
20  \unset fontSize f |
21
22  \set autoBeaming = ##f
23  % Checking \once \override
24  \once \override Stem.thickness = #8.0 d8
25  % Checking two overrides
26  \override Stem.thickness = #8.0 \override Flag.stroke-style = "grace"
27  d8
28  % reverting one of them
29  \revert Stem.thickness d8
30  % and the other
31  \revert Flag.stroke-style c8
32
33  % checking tweaks
34  c2-\tweak color #red ->
35}
36\addQuote "music" \mus
37
38\layout {
39  \context {
40    \Score
41    quotedEventTypes = #'(StreamEvent)
42  }
43}
44
45\score
46{ <<
47  \new Staff \mus
48  \new Voice { \quoteDuring "music" s1*2 }
49>> }
50