Hi Urs,
Someone gave me this:
#(define-markup-command (path-draw-line layout props dest) (pair?)
#:category graphic
#:properties ((line-cap-style 'round)
(thickness 1))
(interpret-markup layout props
(markup
#:override `(line-cap-style . ,line-cap-style)
#:path thickness `((moveto 0 0)
(lineto ,(car dest) ,(cdr dest))))))
It works (with ‘square override) in a markup — perhaps you can adapt it for
your needs?
Hope this helps!
Kieren.
________________________________
Kieren MacMillan, composer
‣ website: www.kierenmacmillan.info
‣ email: i...@kierenmacmillan.info
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
