Am 11.06.2012 18:32, schrieb David Kastrup:
It would be good if you mentioned what override-color-for-all-grobs actually is.
I found it here: http://lsr.dsi.unimi.it/LSR/Snippet?id=443 #(define (override-color-for-all-grobs color) (lambda (context) (let loop ((x all-grob-descriptions)) (if (not (null? x)) (let ((grob-name (caar x))) (ly:context-pushpop-property context grob-name 'color color) (loop (cdr x))))))) Eluze _______________________________________________ lilypond-user mailing list [email protected] https://lists.gnu.org/mailman/listinfo/lilypond-user
