From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Tue, 9 Mar 2004 23:14:20 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: release/2.1.30~16
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c4bc278c8d3c24f9df3dd0ad1d2ff1f2de600b3e;p=lilypond.git

*** empty log message ***
---

diff --git a/lily/paper-book.cc b/lily/paper-book.cc
index 8beddc6d33..854356baf6 100644
--- a/lily/paper-book.cc
+++ b/lily/paper-book.cc
@@ -126,10 +126,17 @@ Paper_book::get_title (int i)
 
   SCM s = ly_modules_lookup (get_scopes (i), field); 
   if (s != SCM_UNDEFINED && scm_variable_bound_p (s) == SCM_BOOL_T)
-    return unsmob_stencil (gh_call2 (make_title,
-				     // papers_[i]->self_scm (),
-				     papers_[0]->self_scm (),
-				     scm_variable_ref (s)));
+    {
+      Stencil *title = unsmob_stencil (gh_call2 (make_title,
+						 papers_[0]->self_scm (),
+						 scm_variable_ref (s)));
+      
+      /* match systems, which are also aligned to center */
+      //(ly:stencil-align-to! header-stencil Y CENTER)
+      title->align_to (Y_AXIS, CENTER);
+      return title;
+    }
+  
   return 0;
 }