Waagrechte Vorschlagbögen kürzer machen - wie?

[Manuela]

Die waagrechten Vorschlagbögen, die mit \myAcc erzeugt werden, sind für meinen Geschmack zu lang, wie kann ich sie verkürzen? Der betreffende Code soll in eine Zeile passen.

Code Auswählen Erweitern

\version "2.19.82"
\language "deutsch"

startMyGrace =  {
  \temporary \override Slur.minimum-length = #0.1  %% welchen Effekt hat diese Zeile? ich kann keinen Unterschied feststellen
  \startSlashedGraceMusic
  <>-#(make-music 'LaissezVibrerEvent)
  \revert Slur.minimum-length
}

myAcc =
#(def-grace-function startMyGrace stopSlashedGraceMusic)

staGr = {
  \startGraceMusic
  <>-#(make-music 'LaissezVibrerEvent)
}

myGrace =
#(def-grace-function staGr stopSlashedGraceMusic)

\relative c'' {
  \time 3/8
  \override Score.NonMusicalPaperColumn.line-break-permission = ##f
  \override Score.NonMusicalPaperColumn.page-break-permission = ##f
  \set Staff.beamExceptions = #'()
  \set Timing.baseMoment = #(ly:make-moment 1/8)
  \set Staff.beatStructure = #'(1 1 1 )
  e,16-1( g-2) c-4( e-5) d-3( c-2)
  \myAcc h8-1 f'16-.-5[ r32 f( d8.-3 h16-2)]
  g16( h)  d( f) e( d)
  \myAcc c8-1 g'16-.[ r32 f( e8.-3 c16-1)]
  a'32-5( g fis e d16[ d'-.) d-. d-.]
  d32-5( c h a g16[ g'-.) g-. g-.]
  g16([ d h g-1] \slashedGrace h8 a32-2 d a h)
  a8( g4) \bar ":..:"
}

[harm6]

Hallo Manuela,

da hilft nur die control-points anzugehen.
\shape innerhalb von startMyGrace könnte funktionieren.

Gruß,
  Harm

[Manuela]

Danke Harm.

Ich löse das Problem inzwischen anderweitig, indem ich jedes Stück auf 2 Seiten setze und die Staffsize erhöhe.