also restore Y

extent. Fixes bugs with stem attachment of parenthesized note
heads.

diff --git a/ChangeLog b/ChangeLog
index c058e4ffba8269836d1f2efd1008e0cd2d47d64c..ece84a094c0e1174852e4173024ea0d79af62a1a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2002-09-05  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+       * input/regression/molecule-hacking.ly: also restore Y
+       extent. Fixes bugs with stem attachment of parenthesized note
+       heads.
+
 2002-09-04  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
        * input/test/clef-end-of-line.ly: new file.

diff --git a/input/regression/molecule-hacking.ly b/input/regression/molecule-hacking.ly
index 19f94d9380cc1d616db050f4221c5b65a7386239..b14b817996ad565021dea65a4a94290ca8c73ab0 100644 (file)
--- a/input/regression/molecule-hacking.ly
+++ b/input/regression/molecule-hacking.ly
@@ -34,8 +34,9 @@ GROB.  The dimensions of the molecule is not affected.
            (subject (callback grob))
 
            ; remember old size
-           (subject-dims (ly-get-molecule-extent subject 0))
-           )
+           (subject-dim-x (ly-get-molecule-extent subject 0))
+           (subject-dim-y (ly-get-molecule-extent subject 1))
+       )
 
         ; add parens
         (set! subject
@@ -44,7 +45,8 @@ GROB.  The dimensions of the molecule is not affected.
              0 -1 popen  0.2))
 
        ; revert old size.
-       (ly-set-molecule-extent! subject 0 subject-dims)
+       (ly-set-molecule-extent! subject 0 subject-dim-x)
+       (ly-set-molecule-extent! subject 1 subject-dim-y)
        subject
     )
      )