/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 1998--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ Copyright (C) 1998--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
LilyPond is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
fingering->set_property ("script-priority", scm_from_int (priority));
- 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));
fingerings_.push_back (fingering);
}