[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: \box overlaps

From: David Kastrup
Subject: Re: \box overlaps
Date: Mon, 18 Mar 2013 23:10:58 +0100
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux)

Eluze <address@hidden> writes:

> Am 18.03.2013 22:17, schrieb Thomas Morley:
>> \version "2.17.12"
>> \markup \box { \left-brace #80 \left-brace #80 }
> 1st occurrence is 2.17.9!

I suspect

commit bad0e5f6c8a3e5a40284e4120cb9753b77a8d7b3
Author: Keith OHara <address@hidden>
Date:   Wed Nov 21 13:52:53 2012 -0800

    markup.scm: use stencil extents when stacking; issue 723

diff --git a/scm/markup.scm b/scm/markup.scm
index 31bbaee..a4f723e 100644
--- a/scm/markup.scm
+++ b/scm/markup.scm
@@ -62,7 +62,8 @@ Example:
   (cons (acons key val (car chain)) (cdr chain)))
 (define-public (stack-stencil-line space stencils)
-  "DOCME"
+  "Adjoin a list of STENCILS along the X axis, leaving SPACE between the
+   end of each stencil and the reference point of the following stencil."
   (if (and (pair? stencils)
            (ly:stencil? (car stencils)))
@@ -70,7 +71,7 @@ Example:
                (ly:stencil? (cadr stencils)))
           (let* ((tail (stack-stencil-line space (cdr stencils)))
                  (head (car stencils))
-                 (xoff (+ space (interval-length (ly:stencil-extent head X)))))
+                 (xoff (+ space (interval-end (ly:stencil-extent head X)))))
             (ly:stencil-add head
                             (ly:stencil-translate-axis tail xoff X)))
           (car stencils))

though from the patch itself, it appears plausible that this might be a
_desired_ effect of the change as a consequence of the brace metrics.

David Kastrup

reply via email to

[Prev in Thread] Current Thread [Next in Thread]