Re: Integrating a markup in a music-function

[Pierre Perol-Schneider]

Hi Harm,

2014-07-10 10:54 GMT+02:00 Thomas Morley-2 <address@hidden>:
 

try:

\version "2.18.2"

#(define (general-column align-dir baseline mols)
  (let* ((aligned-mols
           (map (lambda (x) (ly:stencil-aligned-to x X align-dir)) mols)))
    (stack-lines -1 0.0 baseline aligned-mols)))

#(define-markup-command (center-text-string layout props arg)
  (string?)
  #:properties ((baseline-skip)
                wordwrap-string-internal-markup-list)
  (general-column CENTER baseline-skip
               (wordwrap-string-internal-markup-list layout props #f arg)))

shortIncipit =
#(define-music-function (parser location instr-name ) (markup?)

  #{
    \set Staff.instrumentName =
      \markup {
        \override #'(line-width . 12)

        \center-text-string #instr-name
      }
  #})

\layout { indent = 30 }

{ \shortIncipit "Cantus primi chori" c' }

Perfect !

Thanks Harm,

 

OT: I'm replying via the nabble-interface, because your post didn't appear
in my mails til now. Currently it seems I miss several mails.
Some of them I notice, when they are quoted.

Others with the same experience?

Indeed, I've mentioned it here : http://lilypond.1069038.n5.nabble.com/Beam-subdivided-at-non-periodic-intervals-tt164174.html#none

Cheers,
Pierre