From 005035fec14e578c6824a87517574888d655596a Mon Sep 17 00:00:00 2001
From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Thu, 25 Jan 2001 17:22:13 +0100
Subject: [PATCH] release: 1.3.125

============

* Updated Coriolan.

* Bugfix: beams with no stems.

* Cleanup automatic knees, junked calc_interstaff_dist.

* Automatic knees now on by default for vertical distances >= 7 staff-space.

* Bugfix: automatic interstaff knees.

1.3.124.h
---
 CHANGES                                 |   9 +-
 Documentation/regression-test.tely      |   2 +
 Documentation/user/development.itexi    |   5 +
 Documentation/user/refman.itely         |   2 +-
 Documentation/user/tutorial.itely       |   2 +-
 README.txt                              |   9 +-
 VERSION                                 |   4 +-
 input/bugs/prefatory-spacing.ly         |   2 +-
 input/test/molecule-hacking.ly          |   3 +-
 input/test/rhythmic-staff.ly            |   6 +-
 lily/auto-change-music.cc               |   0
 lily/cross-staff.cc                     |   0
 lily/include/cross-staff.hh             |   0
 lily/stem.cc                            |   5 +-
 lily/text-spanner-engraver.cc           |   4 +-
 lily/text-spanner.cc                    |   2 +
 lily/translator-group.cc                |   2 +-
 make/out/lilypond.lsm                   |   8 +-
 make/out/lilypond.spec                  |   4 +-
 scm/backend-documentation-lib.scm       |   4 +-
 scm/clef.scm                            |   5 +-
 scm/documentation-lib.scm               |  10 +-
 scm/engraver-documentation-lib.scm      |  43 +++-
 scm/foo.scm                             |   1 +
 scm/generic-property.scm                |   1 +
 scm/grob-description.scm                |   1 -
 scm/grob-property-description.scm       | 285 ++++++++++++------------
 scm/translator-property-description.scm |  38 ++--
 scripts/ly2dvi.py                       |   3 +
 29 files changed, 250 insertions(+), 210 deletions(-)
 delete mode 100644 lily/auto-change-music.cc
 delete mode 100644 lily/cross-staff.cc
 delete mode 100644 lily/include/cross-staff.hh

diff --git a/CHANGES b/CHANGES
index 3589336dc1..20e4f3b8c0 100644
--- a/CHANGES
+++ b/CHANGES
@@ -5,16 +5,10 @@
 
 * Bugfix: beams with no stems.
 
-1.3.124.jcn2
-============
-
 * Cleanup automatic knees, junked calc_interstaff_dist.
 
 * Automatic knees now on by default for vertical distances >= 7 staff-space.
 
-1.3.124.jcn1
-============
-
 * Bugfix: automatic interstaff knees.
 
 1.3.124.hwn1
@@ -29,6 +23,9 @@ combinations with auto-change and part-combine.
 
 * Add printfilename option to @lilypondfile 
 
+* Include Grobs in Context self-documentation; remove "Grob " from
+node name for grob documentation.
+
 1.3.124
 =======
 
diff --git a/Documentation/regression-test.tely b/Documentation/regression-test.tely
index 8b458c6389..95d4f9b9ce 100644
--- a/Documentation/regression-test.tely
+++ b/Documentation/regression-test.tely
@@ -239,5 +239,7 @@ signatures.
 
 @lilypondfile[printfilename]{between-systems.ly}
 
+@lilypondfile{molecule-hacking.ly}
+
 @bye
 
diff --git a/Documentation/user/development.itexi b/Documentation/user/development.itexi
index 88866cc671..39bfb5c978 100644
--- a/Documentation/user/development.itexi
+++ b/Documentation/user/development.itexi
@@ -1009,6 +1009,11 @@ TODO file, listed on the homepage of Jan and
 @uref{http://www.cs.uu.nl/~hanwen/lily-devel,Han-Wen}.  Modifying
 LilyPond almost always requires patches to the C++ part.
 
+If you still don't have any idea what to do, you might want to browse
+the mailing lists; Users do lots of feature requests, and you could
+implement any of them.
+
+
 There are also numerous other interesting projects that are more or less
 related  to LilyPond
 
diff --git a/Documentation/user/refman.itely b/Documentation/user/refman.itely
index b79fa74a4d..aed23a3831 100644
--- a/Documentation/user/refman.itely
+++ b/Documentation/user/refman.itely
@@ -1971,7 +1971,7 @@ The chord names that LilyPond should print are fully customisable.  The
 default code can be found in @file{scm/chord-name.scm}.  Chord names are
 based on Banter style naming, which is unambiguous and has a logical
 structure.  Typical American style chord names are implemented as a
-variation on Banter names, they can be selected by setting poperty
+variation on Banter names, they can be selected by setting property
 @code{ChordName.style} to @code{american}:
 
 @quotation
diff --git a/Documentation/user/tutorial.itely b/Documentation/user/tutorial.itely
index 1c1afda7dc..aae6f192cc 100644
--- a/Documentation/user/tutorial.itely
+++ b/Documentation/user/tutorial.itely
@@ -930,7 +930,7 @@ hoomPah  = \notes \repeat unfold 8 \transpose c' { c8 \stemdown c'8 \stemup }
 
 bassvoices = \notes \relative c' {
 	c4 g8. b,16
-	\autochange Staff \hoomPah o
+	\autochange Staff \hoomPah 
 	\translator Staff = down
 	\stemdown [c8 c'8] r4
 	<g d'> r4
diff --git a/README.txt b/README.txt
index 4c9e574261..c07974d42c 100644
--- a/README.txt
+++ b/README.txt
@@ -12,7 +12,7 @@ Versioning
 
    LilyPond uses a versioning scheme similar to the Linux kernel.  In a
 version "x.y.z", an even second number 'y' denotes a stable version.
-For development versions 'y' is odd.  Sh, in theory, version 1.2 is
+For development versions 'y' is odd.  So, in theory, version 1.2 is
 stable, which means that there are no glaring errors in it. In practice
 1.2.x is also unmaintained.
 
@@ -110,10 +110,3 @@ use <help-gnu-music@gnu.org> and <gnu-music-discuss@gnu.org>.  Please
 consult the FAQ and installation instructions before mailing your
 problems.
 
-CDROM distributions
-===================
-
-   If you have received LilyPond on a cdrom, chances are that
-development has moved some patchlevels up.  Please check the latest
-version of LilyPond before reporting bugs.
-
diff --git a/VERSION b/VERSION
index 1cfc3072fa..1d7491b67f 100644
--- a/VERSION
+++ b/VERSION
@@ -1,8 +1,8 @@
 PACKAGE_NAME=LilyPond
 MAJOR_VERSION=1
 MINOR_VERSION=3
-PATCH_LEVEL=124
-MY_PATCH_LEVEL=jcn3
+PATCH_LEVEL=125
+MY_PATCH_LEVEL=
 
 # use the above to send patches: MY_PATCH_LEVEL is always empty for a
 # released version.
diff --git a/input/bugs/prefatory-spacing.ly b/input/bugs/prefatory-spacing.ly
index 6ffeb877e8..23da618be9 100644
--- a/input/bugs/prefatory-spacing.ly
+++ b/input/bugs/prefatory-spacing.ly
@@ -1,6 +1,6 @@
 % the space after clef/key is stretched too much.
 
-foo = \notes\relative c''   {   \key as \major; dis4 dis dis! dis? }
+foo = \notes\relative c''   {   \key as \major; d }
 
 \score {
 
diff --git a/input/test/molecule-hacking.ly b/input/test/molecule-hacking.ly
index 1c9cf4eea5..49a9ce9f4f 100644
--- a/input/test/molecule-hacking.ly
+++ b/input/test/molecule-hacking.ly
@@ -4,7 +4,8 @@ providing custom glyphs for notation elements.  A simple example is
 adding parentheses to existing molecule callbacks.
 
 The parenthesized beam is less successful due to implementation of the
-Beam.
+Beam. The note head is also rather naive, since the extent of the
+parens are also not seen by accidentals.
 ";
 	
 	 }
diff --git a/input/test/rhythmic-staff.ly b/input/test/rhythmic-staff.ly
index 44a5c6d184..313e700e07 100644
--- a/input/test/rhythmic-staff.ly
+++ b/input/test/rhythmic-staff.ly
@@ -1,7 +1,9 @@
+
 \score{
   \context RhythmicStaff {
     \notes\relative c''{ 
-      \clef percussion;
+      \property RhythmicStaff.clefGlyph = #"clefs-percussion"
+	\property RhythmicStaff.clefPosition = #0
       \time 4/4; 
       r4 r g2 | r4 g r2 | g1:32 | r1 |
     }
@@ -9,7 +11,7 @@
   \paper{
     \translator{
       \RhythmicStaffContext
-      \consists "Clef_engraver"; % Doesn't work!?
+      \consists "Clef_engraver";
     }
   }
 }
diff --git a/lily/auto-change-music.cc b/lily/auto-change-music.cc
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lily/cross-staff.cc b/lily/cross-staff.cc
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lily/include/cross-staff.hh b/lily/include/cross-staff.hh
deleted file mode 100644
index e69de29bb2..0000000000
diff --git a/lily/stem.cc b/lily/stem.cc
index af597fd0a7..e640d0a7d0 100644
--- a/lily/stem.cc
+++ b/lily/stem.cc
@@ -24,6 +24,7 @@
 #include "beam.hh"
 #include "rest.hh"
 #include "group-interface.hh"
+// #include "cross-staff.hh"
 #include "staff-symbol-referencer.hh"
 #include "spanner.hh"
 
@@ -638,11 +639,11 @@ Stem::calc_stem_info (Grob*me)
   if (gh_number_p (s))
     info.idealy_f_ -= gh_scm2double (s);
 
-  Grob *common = me->common_refpoint (beam, Y_AXIS);
+ Grob *common = me->common_refpoint (beam, Y_AXIS);
   Real interstaff_f = beam_dir *
     (me->relative_coordinate (common, Y_AXIS)
      - beam->relative_coordinate (common, Y_AXIS));
-  
+
   info.idealy_f_ += interstaff_f;
   info.miny_f_ += interstaff_f;
   info.maxy_f_ += interstaff_f ;
diff --git a/lily/text-spanner-engraver.cc b/lily/text-spanner-engraver.cc
index 69b6056406..4f339eb92c 100644
--- a/lily/text-spanner-engraver.cc
+++ b/lily/text-spanner-engraver.cc
@@ -86,7 +86,6 @@ Text_spanner_engraver::try_music (Music *m)
 void
 Text_spanner_engraver::create_grobs ()
 {
-  /////
   if (req_drul_[STOP])
     {
       if (!span_)
@@ -103,6 +102,7 @@ Text_spanner_engraver::create_grobs ()
 	  finished_ = span_;
 	  span_ = 0;
 	  current_req_ = 0;
+	  req_drul_[STOP] = 0;
 	}
     }
 
@@ -126,7 +126,9 @@ Text_spanner_engraver::create_grobs ()
 	  Side_position::set_axis (span_, Y_AXIS);
 	  Grob *e = unsmob_grob (get_property ("currentMusicalColumn"));
 	  span_->set_bound (LEFT, e);
+	  
 	  announce_grob (span_, req_drul_[START]);
+	  req_drul_[START] = 0;
 	}
     }
 }
diff --git a/lily/text-spanner.cc b/lily/text-spanner.cc
index 22d400cc6b..ba1e420fc1 100644
--- a/lily/text-spanner.cc
+++ b/lily/text-spanner.cc
@@ -1,4 +1,5 @@
 /*
+
   text-spanner.cc -- implement Text_spanner
 
   source file of the GNU LilyPond music typesetter
@@ -47,6 +48,7 @@ Text_spanner::brew_molecule (SCM smob)
   Direction d = LEFT;
   do
     {
+      extra_off [d]=0;
       Item *b = spanner->get_bound (d);
       broken[d] = b->break_status_dir () != CENTER;
 
diff --git a/lily/translator-group.cc b/lily/translator-group.cc
index 367e6d1277..1ae75fc8b9 100644
--- a/lily/translator-group.cc
+++ b/lily/translator-group.cc
@@ -459,7 +459,7 @@ void
 add_trans_scm_funcs ()
 {
   scm_make_gsubr ("ly-get-trans-property", 2, 0, 0, (Scheme_function_unknown)ly_get_trans_property);
-  scm_make_gsubr ("ly-get-trans-property", 3, 0, 0, (Scheme_function_unknown)ly_get_trans_property);
+  scm_make_gsubr ("ly-set-trans-property", 3, 0, 0, (Scheme_function_unknown)ly_set_trans_property);
 }
 
 ADD_SCM_INIT_FUNC(trans_scm, add_trans_scm_funcs);
diff --git a/make/out/lilypond.lsm b/make/out/lilypond.lsm
index a5202175c0..af2aa58292 100644
--- a/make/out/lilypond.lsm
+++ b/make/out/lilypond.lsm
@@ -1,15 +1,15 @@
 Begin3
 Title: LilyPond
-Version: 1.3.124
-Entered-date: 18JAN01
+Version: 1.3.125
+Entered-date: 25JAN01
 Description: 
 Keywords: music notation typesetting midi fonts engraving
 Author: hanwen@cs.uu.nl (Han-Wen Nienhuys)
 	janneke@gnu.org (Jan Nieuwenhuizen)
 Maintained-by: hanwen@stack.nl (Han-Wen Nienhuys)
 Primary-site: sunsite.unc.edu /pub/Linux/apps/sound/convert
-	1000k lilypond-1.3.124.tar.gz 
+	1000k lilypond-1.3.125.tar.gz 
 Original-site: ftp.cs.uu.nl /pub/GNU/LilyPond/development/
-	1000k lilypond-1.3.124.tar.gz 
+	1000k lilypond-1.3.125.tar.gz 
 Copying-policy: GPL
 End
diff --git a/make/out/lilypond.spec b/make/out/lilypond.spec
index 1576b956fe..3074a7dde0 100644
--- a/make/out/lilypond.spec
+++ b/make/out/lilypond.spec
@@ -1,11 +1,11 @@
 %define info yes
 
 Name: lilypond
-Version: 1.3.124
+Version: 1.3.125
 Release: 1
 License: GPL
 Group: Applications/Publishing
-Source0: ftp.cs.uu.nl:/pub/GNU/LilyPond/development/lilypond-1.3.124.tar.gz
+Source0: ftp.cs.uu.nl:/pub/GNU/LilyPond/development/lilypond-1.3.125.tar.gz
 Summary: A program for printing sheet music.
 URL: http://www.cs.uu.nl/~hanwen/lilypond
 # Icon: lilypond-icon.gif
diff --git a/scm/backend-documentation-lib.scm b/scm/backend-documentation-lib.scm
index 09a626c623..9802360423 100644
--- a/scm/backend-documentation-lib.scm
+++ b/scm/backend-documentation-lib.scm
@@ -31,7 +31,7 @@
 (define (document-grob-property sym grob-description )
   (let* ((handle (assoc sym grob-description))
 	 (defval (if (eq? handle #f)
-		     ""
+		     "(unset)"
 		   (scm->texi (cdr handle))))
 	 (propdoc (backend-property->texi sym)))
 	 
@@ -97,7 +97,7 @@
 			 engraver-description-alist))))
        (string-append
 	name " grobs are created by: "
-	(human-listify (map reffy
+	(human-listify (map ref-ify
 			    (map engraver-name
 				 (map symbol->string engravers))))))
 
diff --git a/scm/clef.scm b/scm/clef.scm
index e3c3215e1f..d9eecfb6b9 100644
--- a/scm/clef.scm
+++ b/scm/clef.scm
@@ -89,11 +89,10 @@
 	   (iterator-ctor . ,Property_iterator::constructor)
 	   (value . ,(caddr e))
 	   )
-	  ,(if (not (equal? oct 0))
-	       `((symbol . clefOctavation)
+	  ((symbol . clefOctavation)
 		 (iterator-ctor . ,Property_iterator::constructor)
 		 (value . ,oct)
-	       ))
+	       )
 	  )
 	(begin
 	  (ly-warn (string-append "Unknown clef type `" cl "'\nSee scm/lily.scm for supported clefs"))
diff --git a/scm/documentation-lib.scm b/scm/documentation-lib.scm
index dd863c9b17..2db0451aa9 100644
--- a/scm/documentation-lib.scm
+++ b/scm/documentation-lib.scm
@@ -71,7 +71,7 @@ Add a ref if REF is set
   (string-append
    "\n" (cdr (assoc level texi-section-alist)) " "
    (if ref
-       (string-append "@ref{" name "}") 
+       (ref-ify name)
        name)
    "\n"))
 
@@ -103,7 +103,7 @@ Add a ref if REF is set
   ;; Menus don't appear in html, so we make a list ourselves
   "\n@ignore\n"
   "\n@ifhtml\n"
-  (description-list->texi (map (lambda (x) (cons (reffy (car x)) (cdr x)))
+  (description-list->texi (map (lambda (x) (cons (ref-ify (car x)) (cdr x)))
 			 items-alist))
   "\n@end ifhtml\n"
   "\n@end ignore\n"))
@@ -133,18 +133,18 @@ Add a ref if REF is set
    ))
 
 (define (context-name name)
-  (string-append "Context " name))
+  name)
 
 (define (engraver-name name)
   name)
 
 (define (grob-name name)
-  (string-append "Grob " name))
+  name)
 
 (define (interface-name name)
   name)
 
-(define (reffy x)
+(define (ref-ify x)
   (string-append "@ref{" x "}"))
 
 (define (human-listify l)
diff --git a/scm/engraver-documentation-lib.scm b/scm/engraver-documentation-lib.scm
index bdab2c870e..8e8ceff574 100644
--- a/scm/engraver-documentation-lib.scm
+++ b/scm/engraver-documentation-lib.scm
@@ -42,9 +42,9 @@
      (if  (null? objs)
 	  ""
 	  (string-append
-	   "This engraver creates \n "
-	   (human-listify (map reffy (map grob-name objs)))
-	   " grobs.")
+	   "This engraver creates the following grobs: \n "
+	   (human-listify (map ref-ify  objs))
+	   ".")
 	  )
 
      "\n\n"
@@ -66,7 +66,7 @@
 			 context-description-alist))))
        (string-append
 	name " is part of contexts: "
-	(human-listify (map reffy (map context-name contexts))))))))
+	(human-listify (map ref-ify (map context-name contexts))))))))
 
 
 ;; First level Engraver description
@@ -103,23 +103,54 @@
 		  (cdr (assoc 'consists context-desc))
 		  (cdr (assoc 'end-consists  context-desc))
 		  ))
+       (grobs  (context-grobs context-desc))
+       (grob-refs (map (lambda (x) (ref-ify x)) grobs))
        )
     
     (string-append 
      desc
+     "\n\nThis context creates the following grobs: \n\n"
+     (apply string-append (map (lambda (x) (string-append " " x "  ")) grob-refs))
+     "."
      
      (if (null? accepts)
 	 "This context is a `bottom' context; it can not contain other contexts."
 	 (string-append
+	  "\n\nContext "
 	  name " can contain \n"
-	  (human-listify (map reffy (map context-name accepts)))))
+	  (human-listify (map ref-ify (map context-name accepts)))))
      
      "\n\nThis context is built from the following engravers: "
      (if no-copies
-	 (human-listify (map reffy (map engraver-name consists)))
+	 (human-listify (map ref-ify (map engraver-name consists)))
 	 (apply string-append 
 		(map document-engraver-by-name consists))))))
 
+(define (engraver-grobs  name)
+  (let* (
+	 (eg (assoc (string->symbol name) engraver-description-alist))
+      )
+
+    (if (eq? eg #f)
+	'()
+	(map symbol->string (caddr (cdr eg)))
+ 	)
+  ))
+
+(define (context-grobs context-desc)
+  (let* (
+	 (consists (append
+		    (list (cdr (assoc 'group-type context-desc)))
+		    (cdr (assoc 'consists context-desc))
+		    (cdr (assoc 'end-consists  context-desc))
+		    ))
+	 (grobs  (apply append
+		  (map engraver-grobs consists))
+	 )
+	 )
+    grobs
+    ))
+
 
 ;; First level Context description
 (define (document-context top context-desc)
diff --git a/scm/foo.scm b/scm/foo.scm
index e69de29bb2..8b13789179 100644
--- a/scm/foo.scm
+++ b/scm/foo.scm
@@ -0,0 +1 @@
+
diff --git a/scm/generic-property.scm b/scm/generic-property.scm
index 3d7bb65af0..f7256676a6 100644
--- a/scm/generic-property.scm
+++ b/scm/generic-property.scm
@@ -23,6 +23,7 @@
 	(list
 	 (list 'beamSlopeDamping number? 'damping)
 	 (list 'autoKneeGap number? 'auto-knee-gap)
+	 (list 'autoInterstaffKneeGap number? 'auto-interstaff-knee-gap)
 	 (list 'beamDirAlgorithm symbol? 'beam-dir-algorithm)
 	 (list 'beamHeight number? 'height-hs)
 	 (list 'beamVerticalPosition number? 'y-position-hs)
diff --git a/scm/grob-description.scm b/scm/grob-description.scm
index e83e911041..043f356734 100644
--- a/scm/grob-description.scm
+++ b/scm/grob-description.scm
@@ -70,7 +70,6 @@
 		 (flag-width-function . ,default-beam-flag-width-function)
 		 (space-function . ,default-beam-space-function)
 		 (damping . 1)
-		 (auto-knee-gap . 7)
 		 (meta . ,(grob-description "Beam" beam-interface))
 		 ))
 	 
diff --git a/scm/grob-property-description.scm b/scm/grob-property-description.scm
index 224bfd0c84..fd5ed70f13 100644
--- a/scm/grob-property-description.scm
+++ b/scm/grob-property-description.scm
@@ -20,234 +20,235 @@
 ;; put this in an alist?
 
 (grob-property-description 'X-extent-callback procedure? "procedure taking an grob and axis argument, returning a number-pair. The return value is the extent of the grob.")
-(grob-property-description 'X-offset-callbacks list? "list of functions, each taking an grob and axis argument. The function determine the position relative to this grob's parent. The last one in the list is called first")
-(grob-property-description 'Y-extent-callback procedure? "see @code{X-extent-callback}")
-(grob-property-description 'Y-offset-callbacks list? "see @code{X-offset-callbacks}")
+(grob-property-description 'X-offset-callbacks list? "list of functions, each taking an grob and axis argument. The function determine the position relative to this grob's parent. The last one in the list is called first.")
+(grob-property-description 'Y-extent-callback procedure? "see @code{X-extent-callback}.")
+(grob-property-description 'Y-offset-callbacks list? "see @code{X-offset-callbacks}.")
 (grob-property-description 'after-line-breaking-callback procedure? "Procedure taking a grob as argument.
-This procedure is called (using dependency resolution) after line breaking. Return value is ignored")
-(grob-property-description 'align number? "the alignment of the text, 0 is horizontal, 1 is vertical")
-(grob-property-description 'align-dir dir? "Which side to align? -1: left side, 0: around center of width, 1: right side")
-(grob-property-description 'alignment-done boolean? "boolean to administrate whether we've done the alignment already (to ensure that the process is done only once)")
+This procedure is called (using dependency resolution) after line breaking. Return value is ignored.")
+(grob-property-description 'align number? "the alignment of the text, 0 is horizontal, 1 is vertical.")
+(grob-property-description 'align-dir dir? "Which side to align? -1: left side, 0: around center of width, 1: right side.")
+(grob-property-description 'alignment-done boolean? "boolean to administrate whether we've done the alignment already (to ensure that the process is done only once).")
 (grob-property-description 'all-elements list? "list of all grobs in this line. Needed for protecting grobs from GC.")
 (grob-property-description 'arch-angle number? "turning angle of the hook of a system brace" )
-(grob-property-description 'arch-height number? "height of the hook of a system brace")
-(grob-property-description 'arch-thick number? "thickness of the hook of system brace")
-(grob-property-description 'arch-width number? "width of the hook of a system brace")
-(grob-property-description 'arithmetic-basicspace number? "see @ref{spacing-spanner-interface}")
-(grob-property-description 'arithmetic-multiplier number? "see @ref{spacing-spanner-interface}")
-(grob-property-description 'attachment pair? "cons of symbols, '(LEFT-TYPE . RIGHT-TYPE), where both types may be alongside-stem, stem, head or loose-end")
+(grob-property-description 'arch-height number? "height of the hook of a system brace.")
+(grob-property-description 'arch-thick number? "thickness of the hook of system brace.")
+(grob-property-description 'arch-width number? "width of the hook of a system brace.")
+(grob-property-description 'arithmetic-basicspace number? "see @ref{spacing-spanner-interface}.")
+(grob-property-description 'arithmetic-multiplier number? "see @ref{spacing-spanner-interface}.")
+(grob-property-description 'attachment pair? "cons of symbols, '(LEFT-TYPE . RIGHT-TYPE), where both types may be alongside-stem, stem, head or loose-end.")
 
 (grob-property-description 'attachment-offset pair? "cons of offsets,
 '(LEFT-offset . RIGHT-offset).  This offset is added to the
 attachments to prevent ugly slurs.  [fixme: we need more documentation here].
-")
-(grob-property-description 'auto-knee-gap number? "The vertical distance of two adjacent beamed notes beyond which to make a knee.")
+.")
+(grob-property-description 'auto-interstaff-knee-gap number? ".")
+(grob-property-description 'auto-knee-gap number? ".")
 
 (grob-property-description 'axes list? "list of axis numbers.
 
 In the case of alignment grobs, this should contain only one number.")
-(grob-property-description 'bar-size number? "size of a bar line")
+(grob-property-description 'bar-size number? "size of a bar line.")
 (grob-property-description 'bars list? "list of barline pointers.")
 (grob-property-description 'barsize-procedure procedure? "Procedure that computes the size of a bar line.")
-(grob-property-description 'bass list? " musical-pitch, optional")
-(grob-property-description 'beam ly-grob? "pointer to the beam, if applicable")
-(grob-property-description 'beam-space-function procedure? "function returning space given multiplicity")
-(grob-property-description 'beam-space-function procedure? "function returning space given multiplicity")
-(grob-property-description 'beam-thickness number? "thickness, measured in staffspace")
-(grob-property-description 'beam-thickness number? "thickness, measured in staffspace")
-(grob-property-description 'beam-width number? "width of the tremolo sign")
-(grob-property-description 'beamAuto boolean? "enable autobeaming?")
-(grob-property-description 'beamed-lengths list? "list of stem lengths given beam multiplicity ")
-(grob-property-description 'beamed-minimum-lengths list? "list of minimum stem lengths given beam multiplicity")
-(grob-property-description 'beamed-stem-shorten number? "shorten beamed stems in forced direction")
-(grob-property-description 'beaming number-pair? "number of beams extending to left and right")
+(grob-property-description 'bass list? " musical-pitch, optional.")
+(grob-property-description 'beam ly-grob? "pointer to the beam, if applicable.")
+(grob-property-description 'beam-space-function procedure? "function returning space given multiplicity.")
+(grob-property-description 'beam-space-function procedure? "function returning space given multiplicity.")
+(grob-property-description 'beam-thickness number? "thickness, measured in staffspace.")
+(grob-property-description 'beam-thickness number? "thickness, measured in staffspace.")
+(grob-property-description 'beam-width number? "width of the tremolo sign.")
+(grob-property-description 'beamAuto boolean? "enable autobeaming?.")
+(grob-property-description 'beamed-lengths list? "list of stem lengths given beam multiplicity .")
+(grob-property-description 'beamed-minimum-lengths list? "list of minimum stem lengths given beam multiplicity.")
+(grob-property-description 'beamed-stem-shorten number? "shorten beamed stems in forced direction.")
+(grob-property-description 'beaming number-pair? "number of beams extending to left and right.")
 (grob-property-description 'beams list? "list of beam ptrs.")
 (grob-property-description 'beautiful number? "number that dictates when a slur should be de-uglyfied.  It correlates with the enclosed area between noteheads and slurs.  A value of 0.1 yields only undisturbed slurs, a value of 5 will tolerate quite high blown slurs.")
-(grob-property-description 'before-grace-spacing-factor number? " stretch space this much if there are grace notes before the column")
+(grob-property-description 'before-grace-spacing-factor number? " stretch space this much if there are grace notes before the column.")
 (grob-property-description 'before-line-breaking-callback procedure? "Procedure taking grob as argument.
-This procedure is called (using dependency resolution) before line breaking, but after generating discretionary items. Return value is ignored")
+This procedure is called (using dependency resolution) before line breaking, but after generating discretionary items. Return value is ignored.")
 (grob-property-description 'before-musical-spacing-factor number? "space before musical columns (eg. taken by accidentals) get this much
 stretched when they follow a musical column, in absence of grace
-notes.  0.0 means no extra space (accidentals are ignored)")
+notes.  0.0 means no extra space (accidentals are ignored).")
 (grob-property-description 'between-system-string string? "string
- to dump between two systems. Useful for forcing pagebreaks")
+ to dump between two systems. Useful for forcing pagebreaks.")
 (grob-property-description 'bounded-by-me list? "list of spanners that have this
 column as start/begin point. Only columns that have grobs or act as bounds are spaced.")
-(grob-property-description 'bracket-thick number? "width of a system start bracket. ")
+(grob-property-description 'bracket-thick number? "width of a system start bracket. .")
 (grob-property-description 'break-align-symbol symbol? "the index in the spacing table (symbol) of the to be aligned item.")
-(grob-property-description 'break-glyph-function procedure? "function taking glyph and break-direction, returning the glyph at a line break")
-(grob-property-description 'breakable boolean? "boolean indicating if this is a breakable item (clef, barline, key sig, etc.)")
-(grob-property-description 'c0-position integer? "integer indicating the position of central C")
+(grob-property-description 'break-glyph-function procedure? "function taking glyph and break-direction, returning the glyph at a line break.")
+(grob-property-description 'breakable boolean? "boolean indicating if this is a breakable item (clef, barline, key sig, etc.).")
+(grob-property-description 'c0-position integer? "integer indicating the position of central C.")
 
 (grob-property-description 'center-element ly-grob? "grob which will
 be at the center of the group after aligning (when using
-Align_interface::center_on_element). ")
-(grob-property-description 'chordChanges boolean? "only show changes in chord scheme?")
+Align_interface::center_on_element). .")
+(grob-property-description 'chordChanges boolean? "only show changes in chord scheme?.")
 (grob-property-description 'collapse-height number? "Minimum height of system start delimiter. If smaller, the delimiter is removed.")
-(grob-property-description 'column-space-strength number? "relative strength of space following breakable columns (eg. prefatory matter)")
-(grob-property-description 'columns list? "list of grobs, typically containing paper-columns, list of note-columns")
+(grob-property-description 'column-space-strength number? "relative strength of space following breakable columns (eg. prefatory matter).")
+(grob-property-description 'columns list? "list of grobs, typically containing paper-columns, list of note-columns.")
 (grob-property-description 'contains-grace boolean? "Used to widen entries for grace notes.")
-(grob-property-description 'control-points list? "List of 4 offsets (number-pairs) that form control points for the  tie/slur shape")
-(grob-property-description 'damping integer? "amount of beam slope damping should beam slope be damped? 0: no, 1: yes, 100000: horizontal beams ")
-(grob-property-description 'dash-length number? "the length of a dash")
-(grob-property-description 'dash-period number? "the length of one dash + white space")
+(grob-property-description 'control-points list? "List of 4 offsets (number-pairs) that form control points for the  tie/slur shape.")
+(grob-property-description 'damping integer? "amount of beam slope damping should beam slope be damped? 0: no, 1: yes, 100000: horizontal beams .")
+(grob-property-description 'dash-length number? "the length of a dash.")
+(grob-property-description 'dash-period number? "the length of one dash + white space.")
 (grob-property-description 'dashed number? "[FIXME: use dash-period/dash length; see text-spanner] number representing the length of the dashes.")
 (grob-property-description 'de-uglify-parameters list? "list of 3 real constants. They define the valid areas for the middle control points. Used in de_uglyfy. They are a bit empirical.")
-(grob-property-description 'default-neutral-direction dir? "Where to go if we're in the middle of the staff")
-(grob-property-description 'delta-y number? "amount of ascension")
-(grob-property-description 'dependencies list? "list of score-grob pointers that indicate who to compute first for certain global passes")
-(grob-property-description 'details list? "alist of parameters for the curve shape")
+(grob-property-description 'default-neutral-direction dir? "Where to go if we're in the middle of the staff.")
+(grob-property-description 'delta-y number? "amount of ascension.")
+(grob-property-description 'dependencies list? "list of score-grob pointers that indicate who to compute first for certain global passes.")
+(grob-property-description 'details list? "alist of parameters for the curve shape.")
 (grob-property-description 'details list? "alist containing contaning a few magic constants.")
 (grob-property-description 'dir-forced boolean? "set if direction has been forced; read by Beam.")
 (grob-property-description 'dir-function procedure? "function of type (count total)->direction.  Default value: beam-dir-majority, also available: beam-dir-mean, beam-dir-median.")
 (grob-property-description 'dir-list list? "list of stem directions, needed for optical spacing correction.")
-(grob-property-description 'direction dir? "up or down, left or right?")
-(grob-property-description 'direction-source ly-grob? "in case side-relative-direction is set, which grob  to get the direction from ")
+(grob-property-description 'direction dir? "up or down, left or right?.")
+(grob-property-description 'direction-source ly-grob? "in case side-relative-direction is set, which grob  to get the direction from .")
 (grob-property-description 'dot ly-grob? "reference to Dots object.")
-(grob-property-description 'dot-count integer? "number of dots")
-(grob-property-description 'duration-log integer? "2-log of the notehead duration")
+(grob-property-description 'dot-count integer? "number of dots.")
+(grob-property-description 'duration-log integer? "2-log of the notehead duration.")
 (grob-property-description 'duration-log integer? "log of the duration, ie. 0=whole note, 1 = half note, etc.")
-(grob-property-description 'edge-height pair? "a cons that specifies the heights of the vertical egdes '(LEFT-height . RIGHT-height)")
-(grob-property-description 'edge-text pair? "a cons that specifies the texts to be set at the edges '(LEFT-text . RIGHT-text)")
+(grob-property-description 'edge-height pair? "a cons that specifies the heights of the vertical egdes '(LEFT-height . RIGHT-height).")
+(grob-property-description 'edge-text pair? "a cons that specifies the texts to be set at the edges '(LEFT-text . RIGHT-text).")
 (grob-property-description 'elements list? "list of grobs, type depending on the Grob where this is set in.")
-(grob-property-description 'expand-limit integer? "maximum number of measures expanded in church rests")
-(grob-property-description 'extra-extent-X number-pair? "enlarge in X dimension by this much, measured in staff space")
-(grob-property-description 'extra-extent-Y number-pair? "see @code{extra-extent-Y}")
-(grob-property-description 'extra-offset number-pair? "pair of reals (a cons) forcing an extra offset   before outputting")
-(grob-property-description 'extra-space number-pair? "pair of distances (cons LEFT RIGHT)")
+(grob-property-description 'expand-limit integer? "maximum number of measures expanded in church rests.")
+(grob-property-description 'extra-extent-X number-pair? "enlarge in X dimension by this much, measured in staff space.")
+(grob-property-description 'extra-extent-Y number-pair? "see @code{extra-extent-Y}.")
+(grob-property-description 'extra-offset number-pair? "pair of reals (a cons) forcing an extra offset   before outputting.")
+(grob-property-description 'extra-space number-pair? "pair of distances (cons LEFT RIGHT).")
 (grob-property-description 'extremity-offset-alist list? "an alist (attachment stem-dir*dir slur-dir*dir) -> offset.  The offset adds to the centre of the notehead, or stem.")
 
 (grob-property-description 'extremity-rules list? "an alist (procedure
 slur dir) -> attachment to determine the attachment (see above).  If
 procedure returns #t, attachment is used.  Otherwise, the next
 procedure is tried.")
-(grob-property-description 'flag-style string? "style for flag (hook of a stem)")
+(grob-property-description 'flag-style string? "style for flag (hook of a stem).")
 (grob-property-description 'flag-width-function procedure? "Procedure that computes the width of a half-beam (a non-connecting beam.).")
 (grob-property-description 'font-family symbol? "partial font
 definition: music roman braces dynamic math ...")
 (grob-property-description 'font-name symbol? "partial font definition:
-base name of font file FIXME: should override other partials")
-(grob-property-description 'font-point-size number? "partial font definition: exact font size in points FIXME: should override font-relative-size")
+base name of font file FIXME: should override other partials.")
+(grob-property-description 'font-point-size number? "partial font definition: exact font size in points FIXME: should override font-relative-size.")
 (grob-property-description 'font-relative-size number? "partial font definition: the relative size compared the `normal' size.
- 0 is style-sheet's normal size, -1 is smaller, +1 is bigger, -1 is smaller")
-(grob-property-description 'font-series symbol? "partial font definition: medium, bold")
-(grob-property-description 'font-shape symbol? "partial font definition: upright or italic")
+ 0 is style-sheet's normal size, -1 is smaller, +1 is bigger, -1 is smaller.")
+(grob-property-description 'font-series symbol? "partial font definition: medium, bold.")
+(grob-property-description 'font-shape symbol? "partial font definition: upright or italic.")
 
 (grob-property-description 'font-style symbol? "a precooked set of font
 definitions, eg. finger volta timesig mark script large Large
-dynamic")
+dynamic.")
 
 (grob-property-description 'force-hshift number? "amount of
 collision_note_width that overides automatic collision settings. This
-is used by @ref{note-collision-interface}")
+is used by @ref{note-collision-interface}.")
 
 (grob-property-description 'fraction number-pair? "fraction of a time signature.")
 (grob-property-description 'full-size-change boolean? "if set, don't make a change clef smaller.")
 
-(grob-property-description 'glyph symbol? "a string determining what (style) of  glyph is typeset. Valid choices depend on the function that is reading this property. ")
-(grob-property-description 'glyph-name string? "a name of character within font")
+(grob-property-description 'glyph symbol? "a string determining what (style) of  glyph is typeset. Valid choices depend on the function that is reading this property. .")
+(grob-property-description 'glyph-name string? "a name of character within font.")
 
-(grob-property-description 'gap number? "Size of a gap in a variable symbol")
+(grob-property-description 'gap number? "Size of a gap in a variable symbol.")
 
-(grob-property-description 'grow-direction dir? "crescendo or decrescendo?")
-(grob-property-description 'hair-thickness number? "thickness, measured in stafflinethickness")
+(grob-property-description 'grow-direction dir? "crescendo or decrescendo?.")
+(grob-property-description 'hair-thickness number? "thickness, measured in stafflinethickness.")
 (grob-property-description 'heads pair? "list of note heads,
 
 FIXME: in Tie this is a pair of grob pointers, pointing to the two heads of the  tie.
 
-")
-(grob-property-description 'height number? "in staffspace ")
+.")
+(grob-property-description 'height number? "in staffspace .")
 (grob-property-description 'height-hs number? "in halfspace.  Only used by Beam.") ; Remove-me 
 (grob-property-description 'height-quants procedure? "function of type (beam staff-line-thickness) -> list of quants.  Default value: default-beam-dy-quants.
-")
-(grob-property-description 'horizontal-shift integer? "integer that identifies ranking of note-column for horizontal shifting. This is used by @ref{note-collision-interface}")
-(grob-property-description 'horizontal-space number? "amount of space to add after a note (in staff-space)")
-(grob-property-description 'ideal-distances list? "(OBJ . (DIST . STRENGTH)) pairs")
+.")
+(grob-property-description 'horizontal-shift integer? "integer that identifies ranking of note-column for horizontal shifting. This is used by @ref{note-collision-interface}.")
+(grob-property-description 'horizontal-space number? "amount of space to add after a note (in staff-space).")
+(grob-property-description 'ideal-distances list? "(OBJ . (DIST . STRENGTH)) pairs.")
 (grob-property-description 'interfaces list? "list of symbols indicating the interfaces supported by this object. Is initialized from the @code{meta} field.")
-(grob-property-description 'inversion list? " musical-pitch, optional")
+(grob-property-description 'inversion list? " musical-pitch, optional.")
 (grob-property-description 'items-worth-living list? "list of interesting items. If empty in a particular system, clear that system.")
 (grob-property-description 'kern number? "amount of extra white space to add.
 
 For text,  this is `relative'(?) to the current alignment.
 
-For barline, space after a thick line")
-(grob-property-description 'left-padding number? "space left of accs")
-(grob-property-description 'length number? "Stem length for unbeamed stems, only for user override")
-(grob-property-description 'lengths list? "Stem length given multiplicity of flag")
-(grob-property-description 'line-count integer? "Number of staff lines")
-(grob-property-description 'line-thickness number? "the thickness[stafflinethickness] of the line")
-(grob-property-description 'lookup symbol? "lookup method: 'value for plain text, 'name for character-name")
-(grob-property-description 'magnify number? "the magnification factor.  FIXME: doesn't work for feta fonts")
+For barline, space after a thick line.")
+(grob-property-description 'left-padding number? "space left of accs.")
+(grob-property-description 'length number? "Stem length for unbeamed stems, only for user override.")
+(grob-property-description 'lengths list? "Stem length given multiplicity of flag.")
+(grob-property-description 'line-count integer? "Number of staff lines.")
+(grob-property-description 'line-thickness number? "the thickness[stafflinethickness] of the line.")
+(grob-property-description 'lookup symbol? "lookup method: 'value for plain text, 'name for character-name.")
+(grob-property-description 'magnify number? "the magnification factor.  FIXME: doesn't work for feta fonts.")
 (grob-property-description 'maximum-duration-for-spacing moment? "space as if a duration of this type is available in this measure.")
 (grob-property-description 'maximum-rest-count integer? "kill off rests so we don't more than this number left.")
-(grob-property-description 'merge-differently-dotted boolean? " Merge noteheads in collisions, even if they have a different number of dots. This normal notation for some types of polyphonic music. The value of this setting is used by @ref{note-collision-interface} ")
+(grob-property-description 'merge-differently-dotted boolean? " Merge noteheads in collisions, even if they have a different number of dots. This normal notation for some types of polyphonic music. The value of this setting is used by @ref{note-collision-interface} .")
 (grob-property-description 'minimum-distance number? "minimum distance between notes and rests.")
-(grob-property-description 'minimum-distances list? "list of rods (ie. (OBJ . DIST) pairs)")
-(grob-property-description 'minimum-extent-X number-pair? "minimum size in X dimension, measured in staff space")
-(grob-property-description 'minimum-extent-Y number-pair? "see @code{minimum-extent-Y}")
+(grob-property-description 'minimum-distances list? "list of rods (ie. (OBJ . DIST) pairs).")
+(grob-property-description 'minimum-extent-X number-pair? "minimum size in X dimension, measured in staff space.")
+(grob-property-description 'minimum-extent-Y number-pair? "see @code{minimum-extent-Y}.")
 (grob-property-description 'minimum-length number? "try to make the
 Grob at least this long.
 
-Also works as a scaling parameter for the length of hyphen. ")
+Also works as a scaling parameter for the length of hyphen. .")
 
 ;; FIXME.
-(grob-property-description 'minimum-space number-pair? "(cons LEFT RIGHT)")
-(grob-property-description 'minimum-space number? "minimum distance that the victim should move (after padding)")
+(grob-property-description 'minimum-space number-pair? "(cons LEFT RIGHT).")
+(grob-property-description 'minimum-space number? "minimum distance that the victim should move (after padding).")
 
-(grob-property-description 'minimum-width number? "minimum-width of rest symbol, in staffspace")
+(grob-property-description 'minimum-width number? "minimum-width of rest symbol, in staffspace.")
 (grob-property-description 'molecule-callback procedure? "Function taking grob as argument, returning a Scheme encoded Molecule.")
-(grob-property-description 'new-accidentals list? "list of (pitch, accidental) pairs")
-(grob-property-description 'no-spacing-rods boolean? "read from grobs: boolean that makes Separation_item ignore this item (MOVE ME TO ITEM)")
-(grob-property-description 'no-stem-extend boolean? "should stem not be extended to middle staff line?")
-(grob-property-description 'non-default boolean? "not set because of existence of a bar?")
+(grob-property-description 'new-accidentals list? "list of (pitch, accidental) pairs.")
+(grob-property-description 'no-spacing-rods boolean? "read from grobs: boolean that makes Separation_item ignore this item (MOVE ME TO ITEM).")
+(grob-property-description 'no-stem-extend boolean? "should stem not be extended to middle staff line?.")
+(grob-property-description 'non-default boolean? "not set because of existence of a bar?.")
 (grob-property-description 'note-width number? "unit for horizontal translation, measured in staff-space.")
 (grob-property-description 'number-gap number? "size of the gap for the number in a tuplet.")
-(grob-property-description 'old-accidentals list? "list of (pitch, accidental) pairs")
-(grob-property-description 'origin ly-input-location? "location in input file of the definition")
+(grob-property-description 'old-accidentals list? "list of (pitch, accidental) pairs.")
+(grob-property-description 'origin ly-input-location? "location in input file of the definition.")
 (grob-property-description 'outer-stem-length-limit number? "catch
 suspect beam slopes, set slope to zero if outer stem is lengthened
-more than this (in staffspace)")
-
-(grob-property-description 'padding number? "add this much extra space between objects that are next to each other")
-(grob-property-description 'parallel-beam boolean? "internal: true if there is a beam just as wide as the bracket ")
-(grob-property-description 'pitches list? "list of musical-pitch")
-(grob-property-description 'raise number? "height for text to be raised (a negative value lowers the text")
-(grob-property-description 'right-padding number? "space right of accs")
-(grob-property-description 'right-trim-amount number? "shortening of the lyric extender on the right")
-(grob-property-description 'script-priority number? "A sorting key that determines in what order a script is within a stack of scripts")
+more than this (in staffspace).")
+
+(grob-property-description 'padding number? "add this much extra space between objects that are next to each other.")
+(grob-property-description 'parallel-beam boolean? "internal: true if there is a beam just as wide as the bracket .")
+(grob-property-description 'pitches list? "list of musical-pitch.")
+(grob-property-description 'raise number? "height for text to be raised (a negative value lowers the text.")
+(grob-property-description 'right-padding number? "space right of accs.")
+(grob-property-description 'right-trim-amount number? "shortening of the lyric extender on the right.")
+(grob-property-description 'script-priority number? "A sorting key that determines in what order a script is within a stack of scripts.")
 (grob-property-description 'self-alignment-X number? "real number: -1 =
 left aligned, 0 = center, 1 right-aligned in X direction.
 
  Set to an grob pointer, if you want that grob to be the center.
 In this case, the center grob should have this object as a
 reference point.
-")
-(grob-property-description 'self-alignment-Y number? "like self-alignment-X but for Y axis")
+.")
+(grob-property-description 'self-alignment-Y number? "like self-alignment-X but for Y axis.")
 (grob-property-description 'shortest-playing-duration moment? "duration of the shortest playing in that column.")
 (grob-property-description 'shortest-starter-duration moment? "duration of the shortest notes that starts exactly in this column.")
 (grob-property-description 'side-relative-direction dir? "if set: get the direction from a different object, and multiply by this.")
-(grob-property-description 'side-support list? "the support, a list of grobs")
+(grob-property-description 'side-support list? "the support, a list of grobs.")
 (grob-property-description 'slope-limit number? "set slope to zero if slope is running away steeper than this.")
-(grob-property-description 'space-function procedure? "function of type multiplicity -> real (in staffspace)")
+(grob-property-description 'space-function procedure? "function of type multiplicity -> real (in staffspace).")
 (grob-property-description 'spacing-procedure procedure? "procedure
 taking grob as argument. This is called after
 before-line-breaking-callback, but before the actual line breaking
-itself.  Return value is ignored")
-(grob-property-description 'stacking-dir dir? "stack contents of grobs in which direction ?")
+itself.  Return value is ignored.")
+(grob-property-description 'stacking-dir dir? "stack contents of grobs in which direction ?.")
+(grob-property-description 'staff-space number? "Amount of line leading relative to global staffspace.")
 (grob-property-description 'staff-position number? "vertical position in staff spaces, counted from the middle line.")
-(grob-property-description 'staff-space number? "Amount of line leading relative to global staffspace")
 (grob-property-description 'staffline-clearance number? "don't get closer than this to stafflines.")
-(grob-property-description 'stem ly-grob? "pointer to Stem object")
-(grob-property-description 'stem-centered boolean? "Center stems on note heads. Useful for mensural notation")
-(grob-property-description 'stem-end-position number? "Where does the stem end (the end is opposite to the support-head")
-(grob-property-description 'stem-length number? "length of stem")
-(grob-property-description 'stem-shorten list? "shorten stems in forced directions given flag multiplicity")
+(grob-property-description 'stem ly-grob? "pointer to Stem object.")
+(grob-property-description 'stem-centered boolean? "Center stems on note heads. Useful for mensural notation.")
+(grob-property-description 'stem-end-position number? "Where does the stem end (the end is opposite to the support-head.")
+(grob-property-description 'stem-length number? "length of stem.")
+(grob-property-description 'stem-shorten list? "shorten stems in forced directions given flag multiplicity.")
 (grob-property-description 'stem-spacing-correction number? "optical correction amount.")
 (grob-property-description 'stems list? "list of stem objects, corresponding to the notes that the arpeggio has to be before.")
-(grob-property-description 'stretch-distance number-pair? "pair of distances")
-(grob-property-description 'style symbol? "a string determining what style of  glyph is typeset. Valid choices depend on the function that is reading this property. ")
+(grob-property-description 'stretch-distance number-pair? "pair of distances.")
+(grob-property-description 'style symbol? "a string determining what style of  glyph is typeset. Valid choices depend on the function that is reading this property. .")
 (grob-property-description 'support-head ly-grob? "the note head at
-one end of the stem")
+one end of the stem.")
 (grob-property-description 'text markup? "
 Scheme markup text.  It is defined as follows:
 
@@ -291,17 +292,17 @@ horizontal mode: set all text on one line (default)
 @item any font-style
  finger volta timesig mmrest mark script large Large dynamic
 @end table
-")
-(grob-property-description 'thick number? "thickness, in stafflinethickness")
-(grob-property-description 'thick-thickness number? "thickness, measured in stafflinethickness")
-(grob-property-description 'thickness number? "thickness, measured in stafflinethickness")
-(grob-property-description 'thin-kern number? "space after a hair-line")
-(grob-property-description 'forced-distance number? "forced distance for an alignment")
-(grob-property-description 'threshold number-pair? "(cons MIN MAX), where MIN and MAX are dimensions in staffspace")
+.")
+(grob-property-description 'thick number? "thickness, in stafflinethickness.")
+(grob-property-description 'thick-thickness number? "thickness, measured in stafflinethickness.")
+(grob-property-description 'thickness number? "thickness, measured in stafflinethickness.")
+(grob-property-description 'thin-kern number? "space after a hair-line.")
+(grob-property-description 'forced-distance number? "forced distance for an alignment.")
+(grob-property-description 'threshold number-pair? "(cons MIN MAX), where MIN and MAX are dimensions in staffspace.")
 (grob-property-description 'transparent boolean? "This is almost the
 same as setting molecule-callback to #f, but this retains the
 dimensions of this grob, which means that you can erase grobs
-individually. ")
+individually. .")
 (grob-property-description 'tuplet-bracket-visibility boolean-or-symbol? "
 This controls the visibility of the tuplet bracket.
 Setting it to false will prevent printing of the
@@ -309,14 +310,14 @@ bracket. Setting the property to #'if-no-beam will make it
 print only if there is no beam associated with this tuplet bracket.")
 (grob-property-description 'tuplet-number-visibility boolean-or-symbol? "
 Like @code{tuplet-bracket-visibility}, but for the number.")
-(grob-property-description 'type symbol? "one of: line, dashed-line or dotted-line")
+(grob-property-description 'type symbol? "one of: line, dashed-line or dotted-line.")
 (grob-property-description 'vertical-position-quant-function procedure? "
 function of type (beam multiplicity dy staff-line-thickness) -> real.  Default value: default-beam-y-quants, also available: beam-traditional-y-quants.
-")
-(grob-property-description 'visibility-lambda procedure? "a function that takes the break direction and returns a  cons of booleans containing (TRANSPARENT . EMPTY)")
-(grob-property-description 'when moment? "when does this column happen?")
-(grob-property-description 'word-space number? "elongate left by this much (FIXME: cumbersome semantics)")
-(grob-property-description 'x-gap number? "horizontal gap between notehead and tie")
-(grob-property-description 'y-free number? "minimal vertical gap between slur and noteheads or stems")
-(grob-property-description 'y-position number? "position of left edge")
-(grob-property-description 'y-position-hs number? "in half space, position of left edge.  Only used by Beam.") ;FXIME
+.")
+(grob-property-description 'visibility-lambda procedure? "a function that takes the break direction and returns a  cons of booleans containing (TRANSPARENT . EMPTY).")
+(grob-property-description 'when moment? "when does this column happen?.")
+(grob-property-description 'word-space number? "elongate left by this much (FIXME: cumbersome semantics).")
+(grob-property-description 'x-gap number? "horizontal gap between notehead and tie.")
+(grob-property-description 'y-free number? "minimal vertical gap between slur and noteheads or stems.")
+(grob-property-description 'y-position number? "position of left edge.")
+(grob-property-description 'y-position-hs number? "in half space, position of left edge.  Only used by @ref{Beam}.") ;FXIME
diff --git a/scm/translator-property-description.scm b/scm/translator-property-description.scm
index a5d1de75ed..3cc1354fc1 100644
--- a/scm/translator-property-description.scm
+++ b/scm/translator-property-description.scm
@@ -229,16 +229,16 @@ r1 r1*3 R1*3  \\\\property Score.skipBars= ##t r1*3 R1*3
 ")
 (translator-property-description 'slurBeginAttachment symbol?
 "translates to the car of grob-property 'attachment of NoteColumn. See
-@ref{Grob Slur}.")
-
-(translator-property-description 'slurEndAttachment symbol? "translates to the cdr of grob-property 'attachment of NoteColumn. See @ref{Grob Slur}.")
-(translator-property-description 'slurMelismaBusy boolean? "Signal a slur if automaticMelismata is set")
-(translator-property-description 'solo boolean? "set if solo is detected by the part combiner")
-(translator-property-description 'soloADue boolean? "set Solo/A due texts in the part combiner?")
-(translator-property-description 'soloIIText string? "text for begin of solo for voice ``two'' when part-combining")
-(translator-property-description 'soloText string? "text for begin of solo when part-combining")
+@ref{Slur}.")
+
+(translator-property-description 'slurEndAttachment symbol? "translates to the cdr of grob-property 'attachment of NoteColumn. See @ref{1Slur}.")
+(translator-property-description 'slurMelismaBusy boolean? "Signal a slur if automaticMelismata is set.")
+(translator-property-description 'solo boolean? "set if solo is detected by the part combiner.")
+(translator-property-description 'soloADue boolean? "set Solo/A due texts in the part combiner?.")
+(translator-property-description 'soloIIText string? "text for begin of solo for voice ``two'' when part-combining.")
+(translator-property-description 'soloText string? "text for begin of solo when part-combining.")
 (translator-property-description 'sparseTies boolean? "only create one tie per chord.")
-(translator-property-description 'split-interval number-pair? "always split into two voices for contained intervals when part-combining")
+(translator-property-description 'split-interval number-pair? "always split into two voices for contained intervals when part-combining.")
 (translator-property-description 'squashedPosition integer? " Vertical position of
 squashing for Pitch_squash_engraver.")
 (translator-property-description 'staffsFound list? "list of all staff-symbols found.")
@@ -249,15 +249,15 @@ squashing for Pitch_squash_engraver.")
 Specify the number of beams to draw on the left side of the next note.
 Overrides automatic beaming.  The value is only used once, and then it
 is erased.
-")
-(translator-property-description 'stemRightBeamCount integer? "idem, for the right side")
+.")
+(translator-property-description 'stemRightBeamCount integer? "idem, for the right side.")
 (translator-property-description 'stz string? "Abbreviated form for a stanza, see also Stanza property.")
 (translator-property-description 'textNonEmpty boolean? " If set
 to true then text placed above or below the staff is not assumed to
 have zero width.  @code{\fatText} and @code{\emptyText} are predefined
 settings.
-")
-(translator-property-description 'tieMelismaBusy boolean? "Signal ties when automaticMelismata is set")
+.")
+(translator-property-description 'tieMelismaBusy boolean? "Signal ties when automaticMelismata is set.")
 (translator-property-description 'timeSignatureFraction number-pair? "
 pair of numbers,  signifying the time signature. For example #'(4 . 4) is a 4/4time signature.")
 (translator-property-description 'timing boolean? " Keep administration of measure length, position, bar number, etc?
@@ -282,14 +282,14 @@ context Voice 	imes 2/3 @{
 @}
 @@end lilypond
 @end example
-")
+.")
 (translator-property-description 'unirhythm boolean? "set if unirhythm is detected by the part combiner.")
 (translator-property-description 'unisilence boolean? "set if unisilence is detected by the part combiner.")
-(translator-property-description 'unison boolean? "set if unisono is detected  by the part combiner. ")
+(translator-property-description 'unison boolean? "set if unisono is detected  by the part combiner. .")
 (translator-property-description 'verticalAlignmentChildCallback
 procedure? "what callback to add to children of a vertical alignment.
 It determines what alignment procedure is used on the alignment
-itself.  ")
+itself.  .")
 (translator-property-description 'voltaSpannerDuration moment? "maximum duration of the volta bracket.
 
     Set to a duration to control the size of the brackets printed by
@@ -298,8 +298,8 @@ to use for the brackets.  This can be used to shrink the length of
 brackets in the situation where one alternative is very large.  It may
 have odd effects if the specified duration is longer than the music
 given in an @code{\\alternative}.
-")
-(translator-property-description 'weAreGraceContext boolean? "")
+.")
+(translator-property-description 'weAreGraceContext boolean? ".")
 (translator-property-description 'whichBar string?
 				 "This property is read to determine what type of barline to create.
 
@@ -316,5 +316,5 @@ according to values of @code{defaultBarType}, @code{barAlways},
 
 Legal values are described in @ref{(lilypond-internals)bar-line-interface}.
 
-")
+.")
 
diff --git a/scripts/ly2dvi.py b/scripts/ly2dvi.py
index 00ce2e48af..f0c91aad99 100644
--- a/scripts/ly2dvi.py
+++ b/scripts/ly2dvi.py
@@ -337,6 +337,9 @@ class TeXOutput:
 
         outfile=this.__base + '.dvi'
         if Props.get('output') != '':
+	    if not os.path.exists(Props.get('output')):
+		    os.mkdir(Props.get('output'))
+
             outfile = os.path.join(Props.get('output'), outfile )
             
         this.write(r"""
-- 
2.39.2