- if (relative_stem_dir)
- p->set_elt_property ("side-relative-direction", gh_int2scm (relative_stem_dir));
- else
- stafy.set_direction ((Direction)force_dir);
-
- if (l->get_direction ())
- stafy.set_direction (l->get_direction ());
-
- SCM axisprop = get_property ("scriptHorizontal",0);
- if (gh_boolean_p (axisprop) && gh_scm2bool (axisprop))
- stafy.set_axis (X_AXIS);
- else
- stafy.set_axis (Y_AXIS);
-
- if (follow_staff && !gh_boolean_p (axisprop) && gh_scm2bool (axisprop))
- p->set_elt_property ("no-staff-support", SCM_BOOL_T);
+ if (!follow_staff && ! xaxis)
+ p->set_grob_property ("staff-support", SCM_BOOL_T);