release: 1.3.129

[lilypond.git] / scm / grob-description.scm

diff --git a/scm/grob-description.scm b/scm/grob-description.scm
index 2f3a0d5f003620ec92c835d5f6edb06998e7d74f..df810a004842e80041588d9c184598205f2cdf70 100644 (file)
--- a/scm/grob-description.scm
+++ b/scm/grob-description.scm
@@ -57,7 +57,14 @@
                 ;; todo: clean this up a bit: the list is getting
                 ;; rather long.
                 (molecule-callback . ,Beam::brew_molecule)
-                (thickness . 0.42) ; in staff-space, should use stafflinethick?
+                (y-dy-callbacks . (,Beam::least_squares
+                                   ,Beam::cancel_suspect_slope
+                                   ,Beam::slope_damping
+                                   ,Beam::quantise_dy
+                                   ,Beam::user_override
+                                   ,Beam::do_quantise_y))
+                                                        
+                (thickness . 0.48) ; in staff-space
                 (before-line-breaking-callback . ,Beam::before_line_breaking)
                 (after-line-breaking-callback . ,Beam::after_line_breaking)
                 (default-neutral-direction . 1)
@@ -70,6 +77,7 @@
                 (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))
                 ))
         
@@ -533,7 +541,9 @@
        (SystemStartDelimiter . (
                (molecule-callback . ,System_start_delimiter::brew_molecule)
                (after-line-breaking-callback . ,System_start_delimiter::after_line_breaking)
-               (collapse-height . 1.0)
+               ;; ugh, in practice, brace has height of 4.1 staff-spaces
+               (brace-collapse-height . 4.1)
+               (bracket-collapse-height . 1)
                (thickness . 1.6)
                (arch-height . 1.5)
                (arch-angle . 50.0)
@@ -541,7 +551,6 @@
                (glyph . bar-line)
                (arch-width . 1.5)
                (bracket-thick . 0.25)
-               (bracket-width . 2.0)
                (Y-extent-callback . #f)
                (font-family . braces)
                ;; if you want to set point-size, you cannot set