X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-music-properties.scm;h=4a898263e4911020ad92749f3685847a3c823d64;hb=a982b5419c9be31b649ce847ca6fcf60a0823883;hp=dc4bc2c0f7f76c7fa77f393a3e330c506a4692b7;hpb=3dec4a2d8aff3c7dfa6ff08706f082c60f17794f;p=lilypond.git

diff --git a/scm/define-music-properties.scm b/scm/define-music-properties.scm
index dc4bc2c0f7..4a898263e4 100644
--- a/scm/define-music-properties.scm
+++ b/scm/define-music-properties.scm
@@ -2,7 +2,7 @@
 ;;;;
 ;;;;  source file of the GNU LilyPond music typesetter
 ;;;; 
-;;;; (c) 1998--2006  Han-Wen Nienhuys <hanwen@cs.uu.nl>
+;;;; (c) 1998--2006  Han-Wen Nienhuys <hanwen@xs4all.nl>
 ;;;;                 Jan Nieuwenhuizen <janneke@gnu.org>
 
 (define (music-property-description symbol type? description)
@@ -16,6 +16,9 @@
   (map
    (lambda (x) (apply music-property-description x))
    `(
+     (X-offset ,number? "Offset of resulting grob; only used for balloon texts.")
+     (Y-offset ,number? "Offset of resulting grob; only used for balloon texts. ")
+     
      (alteration ,number? "alteration for figured bass")
 
      (absolute-octave ,integer?
@@ -93,9 +96,6 @@ It must take a single argument, being the context.")
      (quoted-context-id ,string? "The id of the context to direct quotes to, eg., @code{cue}.")
      (quoted-transposition ,ly:pitch? "The pitch used for the quote, overriding \\transposition")
      (to-relative-callback ,procedure? "How to transform a piece of music to relative pitches")
-     (tweaks ,list? "An alist of properties to override in the backend
-for the grob made of this event.")
-     
      (repeat-count  ,integer? "do a @code{\repeat} how ofen?")
      (span-direction ,ly:dir? "Does this start or stop a spanner?")
      (span-type ,string? "What kind of spanner should be created?
@@ -119,11 +119,12 @@ e.g. @code{\\tag #'part ...} could tag a piece of music as only being active in
      (type ,symbol? "The type of this music object. Determines iteration in some cases.")
      (types ,list? "The types of this music object; determines by what
 engraver this music expression is processed.")
+     (tweaks ,list? "An alist of properties to override in the backend
+-for the grob made of this event.")
      (value ,scheme? "Assignment value for a
 translation property")
      (void ,boolean? "If this property is #t, then the music expression is to be
 discarded by the toplevel music handler.")
      (what ,symbol? "What to change for auto-change. FIXME, naming")
-
      (untransposable ,boolean? "If set, this music is not transposed.")
      )))