X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fheader-book-multiple.ly;fp=input%2Fregression%2Fheader-book-multiple.ly;h=c0234de49873fa669a29c5a9eff802ba6665f9c2;hb=32a34dcef0c0041c6d62677487a380b5c8b85712;hp=0000000000000000000000000000000000000000;hpb=f41973ff763d5972a85995b6d40c864281ec6714;p=lilypond.git

diff --git a/input/regression/header-book-multiple.ly b/input/regression/header-book-multiple.ly
new file mode 100644
index 0000000000..c0234de498
--- /dev/null
+++ b/input/regression/header-book-multiple.ly
@@ -0,0 +1,35 @@
+\version "2.16.0"
+
+\header {
+  texidoc="
+A second book-level header block and headers nested in bookpart and score should not clear values from the first header block.  This score should show composer, piece, subtitle and title."
+}
+
+\book {
+  \header {
+    title = "Title incorrect (to be superseded at book level)"
+    subtitle = "Subtitle incorrect (to be superseded in bookpart)"
+    composer = "Composer correct (set in book)"
+    piece = "Piece incorrect (to be superseded in score)"
+  }
+  % This should replace title without affecting other fields
+  \header {
+    title = "Title correct (superseded at book level)"
+  }
+  \bookpart {
+    % This should replace subtitle without affecting other fields
+    \header {
+      subtitle = "Subtitle correct (superseded in bookpart)"
+    }
+    \markup \vspace #2
+    \markup { \bold Note: title, subtitle, piece, and composer expected. }
+    \markup \vspace #2
+    \score {
+      \new Staff { c'1 }
+      \header {
+        % This should replace piece without affecting other fields
+        piece = "Piece correct (superseded in score)"
+      }
+    }
+  }
+}