From: David Kastrup <dak@gnu.org>
Date: Thu, 4 Sep 2014 18:48:06 +0000 (+0200)
Subject: Issue 3855: programming error with \markup \fill-line { \vspace #10 }
X-Git-Tag: release/2.19.14-1~14
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=32c1b89d962855182359ac2e4d7136da15746a53;p=lilypond.git

Issue 3855: programming error with \markup \fill-line { \vspace #10 }
---

diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm
index e0b8982ea2..e16a89e7aa 100644
--- a/scm/define-markup-commands.scm
+++ b/scm/define-markup-commands.scm
@@ -1248,8 +1248,9 @@ words varies according to their relative lengths."
   (let* ((orig-stencils (interpret-markup-list layout props args))
          (stencils
            (map (lambda (stc)
-                  (if (ly:stencil-empty? stc)
-                      point-stencil
+                  (if (ly:stencil-empty? stc X)
+                      (ly:make-stencil (ly:stencil-expr stc)
+                                       '(0 . 0) (ly:stencil-extent stc Y))
                       stc))
                 orig-stencils))
          (text-widths