stencil.scm: \hspace is not special in fill-line;issue 3504

diff --git a/scm/stencil.scm b/scm/stencil.scm
index 0833382b6132c9a675572e4c0c8179a6829e4061..0ce428a6e56568be4f7058037df8f9b900293d51 100644 (file)
--- a/scm/stencil.scm
+++ b/scm/stencil.scm
@@ -55,7 +55,12 @@ a list of @var{paddings}."
       empty-stencil
       (fold
        (lambda (next padding front)
-         (ly:stencil-stack front axis dir next padding))
+         (let ((offset (+ (- (interval-end (ly:stencil-extent front axis))
+                             (interval-start (ly:stencil-extent next axis)))
+                          padding)))
+           (ly:stencil-add
+             front
+             (ly:stencil-translate-axis next offset axis))))
        (car stils)
        (cdr stils)
        paddings)))