X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fpage.scm;h=3e25bdaaee3b46059ce22a90eb1578cb8b7b6426;hb=2a447bff14c82a0f77eee4bc783cc30998ebc977;hp=83bcb40097d99ce941dae27a4a875b86c393b91b;hpb=1ee144d6a59ed99ed91a8a6147cd5e70f162f266;p=lilypond.git

diff --git a/scm/page.scm b/scm/page.scm
index 83bcb40097..3e25bdaaee 100644
--- a/scm/page.scm
+++ b/scm/page.scm
@@ -158,7 +158,7 @@
 	  (set! head-stencil
 		(ly:stencil-combine-at-edge
 		 stencil Y dir head-stencil
-		 sep 0.0))
+		 sep))
 
 	  
 	  ;; add arrow markers 
@@ -221,8 +221,7 @@
   (let*
       ((paper-height (ly:output-def-lookup layout 'paper-height))
        (paper-width (ly:output-def-lookup layout 'paper-width))
-
-       (lmargin (ly:output-def-lookup layout 'left-margin))
+       (lmargin (ly:output-def-lookup layout 'left-margin #f))
        (left-margin (if lmargin
 		       lmargin
 		       (/ (- paper-width