if (scm_is_string (voice_name))
nm = ly_scm2string (voice_name);
+ else if (nm == "")
+ {
+ return 0;
+ }
else
{
ssize idx = nm.rfind ('-');
if (text_)
{
Context *voice = get_voice_to_lyrics (context ());
-
+
if (voice)
{
Grob *head = get_current_note_head (voice);
{
text_->set_parent (head, X_AXIS);
if (melisma_busy (voice))
- text_->set_property ("self-alignment-X", scm_from_int (LEFT));
+ text_->set_property ("self-alignment-X", get_property("lyricMelismaAlignment"));
}
else
{
}
ADD_TRANSLATOR (Lyric_engraver,
- /* doc */ "",
- /* create */ "LyricText",
- /* read */ "",
- /* write */ "");
+ /* doc */
+ "Engrave text for lyrics.",
+
+ /* create */
+ "LyricText ",
+ /* read */
+ "lyricMelismaAlignment ",
+
+ /* write */
+ ""
+ );