From: Neil Puttock <n.puttock@gmail.com>
Date: Tue, 23 Nov 2010 23:46:17 +0000 (+0000)
Subject: Fix #1421.
X-Git-Tag: release/2.13.41-1~1^2~20
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=c811494d4d0a424d8c9c80e52460d7ac3d41a4c8;p=lilypond.git

Fix #1421.

* scm/define-grobs.scm (pure-print-to-height-conversions):

  add ly:arpeggio::brew-chord-slur
---

diff --git a/input/regression/arpeggio-parenthesis.ly b/input/regression/arpeggio-parenthesis.ly
index be6efcaca6..a1bd594381 100644
--- a/input/regression/arpeggio-parenthesis.ly
+++ b/input/regression/arpeggio-parenthesis.ly
@@ -1,17 +1,12 @@
+\version "2.12.0"
 
 \header {
-
   texidoc = "There is a variant of the arpeggio sign that uses a
-  `vertical slur' instead of the wiggle."
-
+`vertical slur' instead of the wiggle."
 }
 
-\version "2.12.0"
-
 \relative c' {
   \arpeggioParenthesis
-
   % Note: does not work for cross staff arpeggios.
-  \override Arpeggio #'X-extent = #ly:grob::stencil-width
   <c g' c>2\arpeggio ~ c
 }
diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index d68a2452f0..c5c6d1094f 100644
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -2426,6 +2426,7 @@
   `(
     (,ly:arpeggio::print . ,ly:arpeggio::pure-height)
     (,ly:arpeggio::brew-chord-bracket . ,ly:arpeggio::pure-height)
+    (,ly:arpeggio::brew-chord-slur . ,ly:arpeggio::pure-height)
     (,ly:hairpin::print . ,ly:hairpin::pure-height)
     (,ly:volta-bracket-interface::print . ,volta-bracket-interface::pure-height)))