From 44762641edefbf783d9680270c1a4e6f8829c77f Mon Sep 17 00:00:00 2001
From: John Zaitseff <address@hidden>
Date: Thu, 9 Oct 2008 09:29:24 +1100
Subject: [PATCH] Added the following header fields: number, translator, harmoniser.  Also
 rearranged poet/translator/meter and composer/arranger/harmoniser to be a
 little neater when one or more fields are not present.

---
 ly/titling-init.ly |   18 ++++++++++++------
 1 files changed, 12 insertions(+), 6 deletions(-)

diff --git a/ly/titling-init.ly b/ly/titling-init.ly
index 17b7789..d2e3034 100644
--- a/ly/titling-init.ly
+++ b/ly/titling-init.ly
@@ -37,7 +37,9 @@ bookTitleMarkup = \markup {
     \column {
       \huge \bigger \bold
       \fill-line {
+        \bigger \fromproperty #'header:number
         \bigger \fromproperty #'header:title
+        ""
       }
       \fill-line {
         \large \smaller \bold
@@ -48,13 +50,17 @@ bookTitleMarkup = \markup {
         \fromproperty #'header:subsubtitle
       }
       \fill-line {
-        \fromproperty #'header:poet
+        \column {
+          \left-align \fromproperty #'header:poet
+          \left-align \fromproperty #'header:translator
+          \left-align \fromproperty #'header:meter
+        }
         { \large \bold \fromproperty #'header:instrument }
-        \fromproperty #'header:composer
-      }
-      \fill-line {
-        \fromproperty #'header:meter
-        \fromproperty #'header:arranger
+        \column {
+          \right-align \fromproperty #'header:composer
+          \right-align \fromproperty #'header:arranger
+          \right-align \fromproperty #'header:harmoniser
+        }
       }
     }
   }
-- 
1.5.4.3