Schneidy wrote > Hi List, > > On the French forum Remy and I (see: > http://lilypond-french-users.1298960.n2.nabble.com/instrumentName-sur-plusieurs-lignes-dans-une-fonction-tt7581499.html) > are stucked with a markup function. > > Here we are so far : > > \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 (textCenter layout props args)(markup-list?) > #:properties ((baseline-skip)) > (general-column CENTER baseline-skip (wordwrap-internal-markup-list > layout props #f args))) > > shortIncipit = > #(define-music-function (parser location InstrName ) (markup?) > #{ > \set Staff.instrumentName = \markup { > \override #'(line-width . 12) > #InstrName > } > #}) > > myInst = \markup\textCenter { Cantus primi chori } > > \layout { > indent = 30 > } > > { \shortIncipit\myInst c' } > > What we would like is to integrate \textCenter in the shortIncipit > function > in order to be able to write : > > { \shortIncipit #"Cantus primi chori" c' } > > Anyone ? > > Cheers, > Pierre
Hi Pierre, 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' } 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? Cheers, Harm -- View this message in context: http://lilypond.1069038.n5.nabble.com/Integrating-a-markup-in-a-music-function-tp164214p164234.html Sent from the User mailing list archive at Nabble.com. _______________________________________________ lilypond-user mailing list lilypond-user@gnu.org https://lists.gnu.org/mailman/listinfo/lilypond-user