Merge branch 'master' of ssh://jomand@git.sv.gnu.org/srv/git/lilypond into lilypond...

[lilypond.git] / scm / page.scm

diff --git a/scm/page.scm b/scm/page.scm
index 83bcb40097d99ce941dae27a4a875b86c393b91b..3e25bdaaee3b46059ce22a90eb1578cb8b7b6426 100644 (file)
--- 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