X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fhara-kiri-keep-previous-settings.ly;fp=input%2Fregression%2Fhara-kiri-keep-previous-settings.ly;h=0b6b66ef05de5718c71ec72dd8a43adb87a284e4;hb=e90f0536f9be39ada0bef0aeb0d275dec3b2fb5b;hp=0000000000000000000000000000000000000000;hpb=a8c9e8a7ca320ab0df5fd32e717fd62cd7635ce6;p=lilypond.git

diff --git a/input/regression/hara-kiri-keep-previous-settings.ly b/input/regression/hara-kiri-keep-previous-settings.ly
new file mode 100644
index 0000000000..0b6b66ef05
--- /dev/null
+++ b/input/regression/hara-kiri-keep-previous-settings.ly
@@ -0,0 +1,43 @@
+\version "2.14.0"
+
+\header { texidoc =
+
+	  "Inserting the harakiri settings globally into the Staff context should
+not erase previous settings to the Staff context.
+"
+
+}
+
+\layout {
+  ragged-right= ##t
+  \context {
+    \Staff
+    \override StaffSymbol #'line-count = 4
+    \consists "Ambitus_engraver"
+    \remove "Clef_engraver"
+  }
+}
+
+% Old \RemoveEmptyStaffContext: Will erase previous settings...
+\score {
+  <<
+    \new Staff \relative c'' {  c4 c c c \break s1 \break c4 c c c \break c c c c}
+    \new Staff \relative c'' {  d4 d d d        s1        s1              s1 }
+    \new Staff \relative c'' {  e4 e e e        s1        e4 e e e        s1 }
+  >>
+  \layout {
+    \context { \RemoveEmptyStaffContext }
+  }
+}
+
+% New \RemoveEmptyStaves settings: Preserves previous settings...
+\score {
+  <<
+    \new Staff \relative c'' {  c4 c c c \break s1 \break c4 c c c \break c c c c}
+    \new Staff \relative c'' {  d4 d d d        s1        s1              s1 }
+    \new Staff \relative c'' {  e4 e e e        s1        e4 e e e        s1 }
+  >>
+  \layout {
+    \context { \Staff \RemoveEmptyStaves }
+  }
+}