X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=input%2Fregression%2Fcontext-mod-with.ly;fp=input%2Fregression%2Fcontext-mod-with.ly;h=68ae7af707a634939ac112ae61c8e2db3543d8b4;hb=941dff9d2a67080e0dd8474f1e70f0c72ace6424;hp=0000000000000000000000000000000000000000;hpb=5a22d6233a39d3164e1ca043244794c268be4ad0;p=lilypond.git

diff --git a/input/regression/context-mod-with.ly b/input/regression/context-mod-with.ly
new file mode 100644
index 0000000000..68ae7af707
--- /dev/null
+++ b/input/regression/context-mod-with.ly
@@ -0,0 +1,45 @@
+\version "2.14.0"
+
+\header  {
+texidoc = "Context modifications can be stored into a variable as a
+\with object. They can be later inserted into another \with block."
+}
+
+% Some sample modifications to be inserted into a \with block later on
+ctxmod = \with {
+  \remove "Time_signature_engraver"
+  \consists "Ambitus_engraver"
+  \override StaffSymbol #'line-count = 4
+}
+
+music = \relative c'' { \key fis \minor c1 d e }
+
+\score { <<
+  % No modifications:
+  \new Staff { \music }
+  % Some context modifications manually written in a \with block
+  \new Staff \with {
+    \remove "Time_signature_engraver"
+    \consists "Ambitus_engraver"
+    \override StaffSymbol #'line-count = 4
+  } { \music }
+  % The same mods as direct value of \with
+  \new Staff \with \ctxmod { \music }
+  % Mods as part of a \with block
+  \new Staff \with { \ctxmod } { \music }
+  % Mods before a context mod in a with block are working:
+  \new Staff \with {
+    \remove "Clef_engraver"
+    \ctxmod
+  } { \music }
+  % Mods before and after a context mod in a with block are working:
+  \new Staff \with {
+    \remove "Clef_engraver"
+    \ctxmod
+    \remove "Key_engraver"
+  } { \music }
+  % Mods can be inserted instead of a \with block (i.e. \with is not required)
+  \new Staff \ctxmod { \music }
+  \new Staff { \music }
+>>
+}