Re: Concatenating markup fragments in a function

[Aaron Hill]

On 2019-09-17 6:24 am, Andrew Bernard wrote:
> What would be the most elegant way to add a space between the
> elements, and enclose the lot in '[' and ']'?

Would this work for you?

%%%%
#(define-markup-command (note-names-multiple layout props args)
  (markup-list?)
  "Provide multiple note names for clarity."
  (define (paired lst) (if (null? lst) '()
      (cons (cons (first lst) (second lst))
            (paired (cddr lst)))))
  (interpret-markup layout props
    #{ \markup \concat { \vcenter [
          \override #'(word-space . 1)
          \line { $@(map (lambda (x) #{
          \markup \note-names $(car x) $(cdr x)
        #}) (paired args)) } \vcenter ] } #} ))
%%%%


-- Aaron Hill