Revert "Apply scripts/auxiliar/fixscm.sh"

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

diff --git a/scm/define-music-properties.scm b/scm/define-music-properties.scm
index c796323c6723dc67e83a926491fdf6df1eaa75eb..dbad0cf0923abadc86445777fe273775b3a5d68d 100644 (file)
--- a/scm/define-music-properties.scm
+++ b/scm/define-music-properties.scm
@@ -28,7 +28,7 @@
    (lambda (x) (apply music-property-description x))
    `(
      (absolute-octave ,integer?
    (lambda (x) (apply music-property-description x))
    `(
      (absolute-octave ,integer?

-                      "The absolute octave for a octave check note.")
+                     "The absolute octave for a octave check note.")

      (alteration ,number? "Alteration for figured bass.")
      (alternative-dir ,ly:dir? "Indicates if an AlternativeMusic is the
 First (-1), Middle (0), or Last (1) of group of alternate endings.")
      (alteration ,number? "Alteration for figured bass.")
      (alternative-dir ,ly:dir? "Indicates if an AlternativeMusic is the
 First (-1), Middle (0), or Last (1) of group of alternate endings.")


@@ -38,7 +38,7 @@ lettering should be incremented.")
 
 TODO: Consider making type into symbol.")
      (articulations ,ly:music-list?
 
 TODO: Consider making type into symbol.")
      (articulations ,ly:music-list?

-                    "Articulation events specifically for this note.")
+                   "Articulation events specifically for this note.")

      (associated-context ,string? "Name of the Voice context associated with
 this @code{\\lyricsto} section.")
      (augmented ,boolean? "This figure is for an augmented figured bass
      (associated-context ,string? "Name of the Voice context associated with
 this @code{\\lyricsto} section.")
      (augmented ,boolean? "This figure is for an augmented figured bass


@@ -58,7 +58,7 @@ TODO: Use SpanEvents?")
      (bracket-stop ,boolean? "Stop a bracket here.")
      (break-penalty ,number? "Penalty for line break hint.")
      (break-permission ,symbol?
      (bracket-stop ,boolean? "Stop a bracket here.")
      (break-penalty ,number? "Penalty for line break hint.")
      (break-permission ,symbol?

-                       "Whether to allow, forbid or force a line break.")
+                      "Whether to allow, forbid or force a line break.")

 
      (cautionary ,boolean? "If set, this alteration needs a
 cautionary accidental.")
 
      (cautionary ,boolean? "If set, this alteration needs a
 cautionary accidental.")


@@ -89,7 +89,7 @@ simultaneous music, or the alternatives of repeated music.")
      (elements-callback ,procedure? "Return a list of children, for use by
 a sequential iterator.  Takes a single music parameter.")
      (error-found ,boolean?
      (elements-callback ,procedure? "Return a list of children, for use by
 a sequential iterator.  Takes a single music parameter.")
      (error-found ,boolean?

-                  "If true, a parsing error was found in this expression.")
+                 "If true, a parsing error was found in this expression.")

      (events ,list? "A list of events contained in this event.")
 
      (figure ,integer? "A bass figure.")
      (events ,list? "A list of events contained in this event.")
 
      (figure ,integer? "A bass figure.")


@@ -220,8 +220,8 @@ repeat element list.")
 FIXME: Naming.")
 
      (X-offset ,number?
 FIXME: Naming.")
 
      (X-offset ,number?

-               "Offset of resulting grob; only used for balloon texts.")
+              "Offset of resulting grob; only used for balloon texts.")

 
 

-(Y-offset ,number?
-          "Offset of resulting grob; only used for balloon texts.")
-)))
+     (Y-offset ,number?
+              "Offset of resulting grob; only used for balloon texts.")
+    )))