Thank you, Thomas!


Not sure I understood correct.
Though, how about:

\version "2.16.2"


Alas, I use 2.14.2...


spaceRight =
#(define-music-function (parser location space)(number?)
 (let* ((amount (+ space 0.5))
        (space-right `(extra-space . ,amount)))
 #{
    %% Maybe additional layout-objects must be affected!?
    \override Score.BarLine #'space-alist #'right-edge = #space-right
    \override Score.KeySignature #'space-alist #'right-edge = #space-right
    \override Score.KeyCancellation #'space-alist #'right-edge = #space-right
    \override Score.TimeSignature #'space-alist #'right-edge = #space-right
 #}))

{
  % commented settings for testings

  \spaceRight #30
  %\key d\major
  a\( b c d~(
  %\breathe
  \break
  %\time 8/8
  %\clef alto
  \key cis\major
  d4 b) c\) d \bar "|."
}


... and this example segfauts, with the following error:

<string>:3:73: error: GUILE signaled an error for the expression beginning here
     \override Score.BarLine #(quote space-alist) #(quote right-edge) = #
                                                                         
space-right
Unbound variable: space-right

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to