*** empty log message ***

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

diff --git a/scm/define-context-properties.scm b/scm/define-context-properties.scm
index 977be9691fd3505d6b20682cabe36369d97a0106..d15ed9b30340df60fea37cb075d7852b8af7a455 100644 (file)
--- a/scm/define-context-properties.scm
+++ b/scm/define-context-properties.scm
@@ -10,7 +10,7 @@
 
 (define (translator-property-description symbol type? description)
  (if (not (equal? #f (object-property symbol 'translation-doc)))
 
 (define (translator-property-description symbol type? description)
  (if (not (equal? #f (object-property symbol 'translation-doc)))

-     (ly:erorr (_ "symbol ~S redefined" symbol)))
+     (ly:error (_ "symbol ~S redefined" symbol)))

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


@@ -23,6 +23,8 @@
      (apply translator-property-description x))
    `(
      (aDueText ,string? "Text to print at a unisono passage.")
      (apply translator-property-description x))
    `(
      (aDueText ,string? "Text to print at a unisono passage.")

+     (alignBelowContext ,string? "Where to insert newly created context in vertiical alignment.")
+     (alignAboveContext ,string? "Where to insert newly created context in vertiical alignment.")

      (alignBassFigureAccidentals ,boolean?
                                 "If true, then the accidentals are aligned in bass figure context.")
 
      (alignBassFigureAccidentals ,boolean?
                                 "If true, then the accidentals are aligned in bass figure context.")
 


@@ -72,6 +74,9 @@ immediately, and if @var{laziness} is @code{#t} then the accidental
 lasts forever.
 @end table
 ")
 lasts forever.
 @end table
 ")

+     (autoBeamCheck ,procedure? "Procedure taking three
+arguments, CONTEXT, DIR start/stop (-1 or 1) and TEST shortest
+note in the beam.  A non-#f return value starts or stops the auto beam.")

      (autoBeaming ,boolean? "If set to true then beams are generated
 automatically.")
 
      (autoBeaming ,boolean? "If set to true then beams are generated
 automatically.")
 


@@ -86,7 +91,7 @@ printed automatically; they must be explicitly created with
 are still counted.  Bar generation will resume according to that count
 if this property is unset.
 ")
 are still counted.  Bar generation will resume according to that count
 if this property is unset.
 ")

-
+     

      (barAlways ,boolean? "If set to true a bar line is drawn after each
 note.")
 
      (barAlways ,boolean? "If set to true a bar line is drawn after each
 note.")
 


@@ -132,6 +137,9 @@ Contains (@var{chord} . @var{markup}) entries.")
      (chordNameSeparator ,markup?
                         "The markup object used to separate
  parts of a chord name.")
      (chordNameSeparator ,markup?
                         "The markup object used to separate
  parts of a chord name.")

+     (chordPrefixSpacer ,number?
+                       "The space added between the root symbol and the prefix
+ of a chord name")

      (chordChanges ,boolean? "Only show changes in chords scheme?")
      (clefGlyph ,string? "Name of the symbol within the music font.")
      (clefOctavation ,integer? "Add
      (chordChanges ,boolean? "Only show changes in chords scheme?")
      (clefGlyph ,string? "Name of the symbol within the music font.")
      (clefOctavation ,integer? "Add


@@ -204,9 +212,13 @@ switches by a thin line")
 determines where fingerings are put relative to the chord being
 fingered.")
 
 determines where fingerings are put relative to the chord being
 fingered.")
 

+     (firstClef ,boolean? "If true, create a new clef when starting a
+staff.")

      (forceClef ,boolean? "Show clef symbol, even if it has not
 changed. Only active for the first clef after the property is set, not
 for the full staff.")
      (forceClef ,boolean? "Show clef symbol, even if it has not
 changed. Only active for the first clef after the property is set, not
 for the full staff.")

+     (gridInterval ,ly:moment?
+                  "Interval for which to generate @ref{GridPoint}s")

 
      (harmonicAccidentals ,boolean? "If set, harmonic notes in chords
 get accidentals.")
 
      (harmonicAccidentals ,boolean? "If set, harmonic notes in chords
 get accidentals.")


@@ -228,6 +240,8 @@ Function taking a string (instrument name), and returning a (@var{min} . @var{ma
 the instrument. Its value is the pitch that sounds like middle C. This
 is used to transpose the MIDI output, and @code{\\quote}s.")
 
 the instrument. Its value is the pitch that sounds like middle C. This
 is used to transpose the MIDI output, and @code{\\quote}s.")
 

+     (keepAliveInterfaces ,list? "List of symbols, signifying grob interfaces that
+are worth keeping a RemoveEmptyStaff staff around for.")   

      (keyAccidentalOrder ,list? " Alist that defines in what order
 alterations should be printed.  The format is (@var{name}
 . @var{alter}), where @var{name} is from 0 .. 6 and @var{alter} from
      (keyAccidentalOrder ,list? " Alist that defines in what order
 alterations should be printed.  The format is (@var{name}
 . @var{alter}), where @var{name} is from 0 .. 6 and @var{alter} from