source file of the GNU LilyPond music typesetter
-(c) 2002--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+(c) 2002--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include "group-interface.hh"
#include "directional-element-interface.hh"
#include "paper-def.hh"
+#include "staff-symbol-referencer.hh"
struct Horizontal_bracket
{
ext.unite (gs[0]->extent (cx, X_AXIS));
Direction d = get_grob_direction (me);
- Real t = me->get_paper()->get_realvar (ly_symbol2scm ("linethickness"));
- SCM lthick = me->get_grob_property ("thickness");
- if (gh_number_p (lthick))
- t *= gh_scm2double (lthick);
+ Real thickness = Staff_symbol_referencer::line_thickness (me);
+ thickness *= robust_scm2double (me->get_grob_property ("thickness"), 1.0);
- Molecule b = Lookup::bracket (X_AXIS, ext, t, - d* 1.0);
+ Molecule b = Lookup::bracket (X_AXIS, ext, thickness, - d* 1.0, thickness/2);
b.translate_axis ( - sp->get_bound (LEFT)->relative_coordinate (cx, X_AXIS), X_AXIS);