[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Ajouter une propriété

From: Bertrand Bordage
Subject: Re: Ajouter une propriété
Date: Tue, 11 Oct 2011 12:06:42 +0200

Justement, il y a tout ce qu'il faut dans define-grob-properties.scm.  Un exemple :

#(define (define-grob-property symbol type? description)
  (if (not (equal? (object-property symbol 'backend-doc) #f))
      (ly:error (_ "symbol ~S redefined") symbol))

  (set-object-property! symbol 'backend-type? type?)
  (set-object-property! symbol 'backend-doc description)

#(define-grob-property 'buddies list? "List of grobs")

{ \override StaffSymbol #'buddies = #'(clef note-head) a }

reply via email to

[Prev in Thread] Current Thread [Next in Thread]