Am 20.06.2015 um 13:45 schrieb Venus' Wink:
Hi Marc,

Thanks for your reply.

To say the truth, I'm under situation that
I can't access the setting of paper size,
so I can't put tag to stand for paper width.

I'd like to expect a way with scheme.

Ok. I played a bit with your example files:

\version "2.18.2"
#(set-default-paper-size "a4" 'landscape)
\score{
        {
                c'1 c' c' c' c' c' c' c' c' c'^"default"( c''
                c' c'') c' c' c' c' c' c' c' c' c' c' \break

                c'1 c' c' c' c' c' c' c' c'
                \override Slur.after-line-breaking = #(lambda (grob)
                    (let* ((layout (ly:grob-layout grob))
                           (paper-width (ly:output-def-lookup layout 
'paper-width)))
                
                          (if (> paper-width 100) ;; !!
#{ \shape #'((0.0 . -2.0) (0.0 . 1.0) (0.0 . 0.0) (0.0 . 0.0)) Slur #} #{ \shape #'(((0.0 . 0.0) (0.0 . 0.0) (0.0 . 0.0) (0.0 . 1.0)) ((0.0 . 5.0) (0.0 . 3.0) (0.0 . 0.5) (0.0 . 0.0))) Slur #}
                          )))
                c'^"image of purpose"( c''
                c' c'') c' c' c' c' c' c' c' c' c' c'
        }
}

You have to change the value of 100 to your needs (I think lilypond
uses staff-spaces as units here).

HTH,

Marc



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

Reply via email to