- Real lt = me->get_layout ()->get_dimension (ly_symbol2scm ("linethickness"));
- Real w = lt * robust_scm2double (me->get_property ("thickness"), 1);
- return Lookup::round_filled_box (Box (Interval (0, w), Interval (-h / 2, h / 2)),
- lt);
+ Real thick
+ = me->layout ()->get_dimension (ly_symbol2scm ("line-thickness"))
+ * robust_scm2double (me->get_property ("thickness"), 1);
+ Real w = 0.8;
+
+ Stencil tip1 = Line_interface::make_line (thick,
+ Offset (0, -height / 2),
+ Offset (w, -height / 2));
+ Stencil tip2 = Line_interface::make_line (thick,
+ Offset (0, height / 2),
+ Offset (w, height / 2));
+ Stencil vline = Line_interface::make_line (thick,
+ Offset (0, -height / 2),
+ Offset (0, height / 2));
+
+ vline.add_stencil (tip1);
+ vline.add_stencil (tip2);
+ vline.translate_axis (-w, X_AXIS);
+ return vline;