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 e0b8982ea25f10a731f7c9638728bf489f80104f..e16a89e7aad9edcda91f8b8a8f70889e7d5e213b 100644 (file)
--- 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