Leland Kusmer wrote:
Is there a way to do this?
Lilypond does this according to bar-glyph-alist,
by calling calc-glyph-name from within the barline print routine.
But when you override the BarLine stencil like this,
you are bypassing the barline print routine.
So try something (which calls calc-glyph-name) like
#(define (with-shapenote-repeats grob)
(let ((g-n (ly:grob-property grob 'glyph-name)))
(cond
((string=? g-n "|:") (dotFn grob))
((string=? g-n ":|") (barDotFn grob))
(else (ly:bar-line::print grob)))))
And maybe the corresponding override doesn't need the \once ?
\override Staff.BarLine #'stencil = #with-shapenote-repeats
Cheers,
Robin
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
