(Text marks): update

[lilypond.git] / scm / define-music-properties.scm

diff --git a/scm/define-music-properties.scm b/scm/define-music-properties.scm
index 58d7eea429ee4d955171de30c9a442f4f65cb6c3..0286f9923fd7a36baa9963ec321ea98b5aecdba1 100644 (file)
--- 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--2005  Han-Wen Nienhuys <hanwen@cs.uu.nl>
+;;;; (c) 1998--2006  Han-Wen Nienhuys <hanwen@cs.uu.nl>
 ;;;;                 Jan Nieuwenhuizen <janneke@gnu.org>
 
 (define (music-property-description symbol type? description)
@@ -38,6 +38,7 @@ TODO: consider making type into symbol ")
      (compress-procedure ,procedure? "compress this music expression. Argument 1: the music, arg 2: factor")
      (context-id ,string? "name of context")
      (context-type ,symbol?  "type of context")
+     (create-new ,boolean? "Create a fresh context.") 
      (descend-only ,boolean? "If set, this @code{\\context} will only
 descend in the context tree.")
      (denominator ,integer? "denominator in a time signature")
@@ -67,6 +68,7 @@ can only be defined as initializer in @file{define-music-types.scm}.")
                 "This pitch was octavated by how many octaves?
 For chord inversions, this is negative.")
      (origin ,ly:input-location? "where was this piece of music defined?")
+     (parenthesize ,boolean? "Enclose resulting objects in parentheses?")
      (page-penalty ,number? "Penalty for page break hint.")
      (penalty ,number? "Penalty for line break hint.")
      (pitch ,ly:pitch? "the pitch of this note")
@@ -83,6 +85,9 @@ It must take a single argument, being the context.")
      (quoted-context-type ,symbol? "The name of the context to direct quotes to, eg., @code{Voice}.")
      (quoted-context-id ,string? "The id of the context to direct quotes to, eg., @code{cue}.")
      (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?")
      (split-list ,list? "splitting moments for part combiner.")
@@ -105,6 +110,8 @@ e.g. @code{\\tag #'part ...} could tag a piece of music as only being active in
 engraver this music expression is processed.")
      (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")
      (part-combine-status ,symbol?
                          "Change to what kind of state? Options are