From d5bc965bceff7f08e1419bc73c039f395b4498d2 Mon Sep 17 00:00:00 2001
From: Knut Petersen <knut_petersen@t-online.de>
Date: Tue, 22 Dec 2015 09:10:50 +0000
Subject: [PATCH] Dont emit \space glyph as empty page number

Werner L reported in 2012 that LP
emits a space glyph referencing
the century schoolbook font at the
top of every page.

If you use gs (old and current) or
pdfcrop to crop output with multiple
pages and print-page-number = ##f
there is excessive white space at the
top of even pages.

ghostscript should handle that better
but a recent gs bug report
http://bugs.ghostscript.com/show_bug.cgi?id=696445
was closed as "WONTFIX".

There is a workaround within lilypond:

\paper {
    [...]
    oddHeaderMarkup = \markup \null
    evenHeaderMarkup = \markup \null
}

Changing " " to "" cured the problem
and appears to have no negative side
effects. Bounding boxes are affected
by this patch certainly so will have
effects in situations where snippets
are used by other third party
programs.
---
 ly/titling-init.ly | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/ly/titling-init.ly b/ly/titling-init.ly
index f397ad6bd9..12bfa4f340 100644
--- a/ly/titling-init.ly
+++ b/ly/titling-init.ly
@@ -149,9 +149,7 @@ book last one."
 
 oddHeaderMarkup = \markup
 \fill-line {
-  %% force the header to take some space, otherwise the
-  %% page layout becomes a complete mess.
-  " "
+  ""
   \on-the-fly #not-part-first-page \fromproperty #'header:instrument
   \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string
 }
@@ -162,7 +160,7 @@ evenHeaderMarkup = \markup
 \fill-line {
   \on-the-fly #print-page-number-check-first \fromproperty #'page:page-number-string
   \on-the-fly #not-part-first-page \fromproperty #'header:instrument
-  " "
+  ""
 }
 
 oddFooterMarkup = \markup {
-- 
2.39.2