release: 1.1.60

[lilypond.git] / lily / lookup.cc

diff --git a/lily/lookup.cc b/lily/lookup.cc
index 9dee0018d242b69fe1bada20135633585e1bfa8c..00354d3c2de448574c19e1109c9dbe71ac84f7fc 100644 (file)
--- a/lily/lookup.cc
+++ b/lily/lookup.cc
@@ -503,12 +503,16 @@ Lookup::staff_brace (Real y, int staff_size) const
     )
   */
 
+  Real step  = 1.0;
+  int minht  = 2 * staff_size;
+  int maxht = 7 *  minht;
+  int idx = ((maxht - step) <? y - minht) / step;
+  idx = idx >? 0;
   
-  Atom at  (gh_list (pianobrace_scm_sym,
-                    gh_double2scm (y),
-                    gh_int2scm (staff_size),
-                    SCM_UNDEFINED
-                    ));
+  SCM f =  ly_symbol (String ("feta-braces" + to_str (staff_size)));
+  SCM e =gh_list (char_scm_sym, gh_int2scm (idx), SCM_UNDEFINED);
+  Atom at  (e);
+  at.font_ = f;
   
   m.dim_[Y_AXIS] = Interval (-y/2,y/2);
   m.dim_[X_AXIS] = Interval (0,0);