latest update for translations.

[lilypond.git] / scm / define-grobs.scm

diff --git a/scm/define-grobs.scm b/scm/define-grobs.scm
index 2ba4eabd7f293369f92ca45c6e864709387eb2d7..99fa123ef8e68e8cb39bc6557028fe859e0d4db2 100644 (file)
--- a/scm/define-grobs.scm
+++ b/scm/define-grobs.scm
@@ -93,7 +93,6 @@
     (Arpeggio
      . (
        (X-extent-callback . ,Arpeggio::width_callback)
-       (Y-extent-callback . #f)        
        (print-function . ,Arpeggio::print)
        (Y-offset-callbacks . (,Staff_symbol_referencer::callback))
        (X-offset-callbacks . (,Side_position_interface::aligned_side))
@@ -385,8 +384,7 @@
      . (
        (Y-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
        (print-function . ,Text_interface::print)
-       (X-offset-callbacks . (,Self_alignment_interface::aligned_on_self
-                              ,Self_alignment_interface::centered_on_parent))
+       (X-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
        (self-alignment-X . 0)
        (no-spacing-rods . #t)
        (script-priority . 100)
@@ -512,7 +510,7 @@
        (X-offset-callbacks . (,Self_alignment_interface::aligned_on_self
                               ,Self_alignment_interface::centered_on_parent))
        (layer . 0)
-       (meta . ((interfaces . (grid-line-interface)))
+       (meta . ((interfaces . (self-alignment-interface grid-line-interface)))
        )))
        
     (Hairpin
@@ -944,8 +942,7 @@
                               ,Rest::polyphonic_offset_callback
                               ))
        (minimum-distance . 0.25)
-       (meta . (
-                (interfaces . (font-interface
+       (meta . ((interfaces . (font-interface
                                rhythmic-head-interface
                                rhythmic-grob-interface
                                staff-symbol-referencer-interface
@@ -1201,15 +1198,13 @@
     (SystemStartBracket
      . (
        (Y-extent-callback . #f)
+       (X-offset-callbacks . (,(lambda (g a) -0.8)))
        (print-function . ,System_start_delimiter::print)
        (glyph . "bracket")
-       (arch-height . 1.5)
-       (arch-angle . 50.0)
-       (arch-thick . 0.25)
-       (arch-width . 1.5)
        (collapse-height . 1)
-       (thickness . 0.25)
-       (meta . ((interfaces . (system-start-delimiter-interface spanner-interface))))
+       (thickness . 0.45)
+       (meta . ((interfaces . (font-interface system-start-delimiter-interface
+                                              spanner-interface))))
        ))
 
     (SystemStartBar
@@ -1258,7 +1253,7 @@
        (print-function . ,Text_spanner::print)
        (font-shape . italic)
        (style . dashed-line)
-       (staff-padding . 0.1)
+       (staff-padding . 0.8)
        (dash-fraction . 0.2)
        (dash-period . 3.0)
        (direction . 1)
@@ -1303,7 +1298,7 @@
        (font-series . bold)
        (meta . ((interfaces
                  . (rhythmic-head-interface
-                    font-interface
+                    font-interface 
                     note-head-interface staff-symbol-referencer-interface
                     text-interface item-interface ))))
        ))