X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Ftitling-init.ly;h=eb9ced5375c577714e31e005877a71caeaad6fe9;hb=be4b87596f425aae78509a6a5f57d4f1eafe5c97;hp=546efac4fac66106297b1cc99432ca9a0e44430f;hpb=09f7d25964ec1ae3ad1f4a862a2b46444f56c50f;p=lilypond.git

diff --git a/ly/titling-init.ly b/ly/titling-init.ly
index 546efac4fa..eb9ced5375 100644
--- a/ly/titling-init.ly
+++ b/ly/titling-init.ly
@@ -1,5 +1,8 @@
 \version "2.16.0"
 
+#(if (guile-v2)
+  (use-modules (ice-9 curried-definitions)))
+
 slashSeparator = \markup {
   \center-align
   \vcenter \combine
@@ -8,17 +11,19 @@ slashSeparator = \markup {
 }
 
 tagline = \markup {
-  \with-url
+  \pad-to-box #'(0 . 0) #'(0 . 3)
+  {  \with-url
 
-  #"http://lilypond.org/"
-  \line {
+    #"http://lilypond.org/"
+    \line {
 
-    %% 2014 = em dash.
+      %% 2014 = em dash.
 
-    #(format #f "Music engraving by LilyPond ~a~awww.lilypond.org"
-       (lilypond-version)
-       (ly:wide-char->utf-8 #x2014)
-       )
+      #(format #f "Music engraving by LilyPond ~a~awww.lilypond.org"
+         (lilypond-version)
+         (ly:wide-char->utf-8 #x2014)
+         )
+    }
   }
 }