- if (!is_direction (fingering->get_property_data ("direction")))
- {
- if (d)
- fingering->set_property ("direction", scm_from_int (d));
- else
- fingering->set_property ("direction", scm_from_int (RIGHT));
- }
+ if (d)
+ fingering->set_property ("direction", scm_from_int (d));
+ else if (!is_direction (fingering->get_property_data ("direction")))
+ fingering->set_property ("direction", scm_from_int (UP));