Having downloaded today's update....
Melisma has been changed to give an extend option, which works,
and add single _ after initial __ or -- , which works fine for separate
notes
But if notes have a Slur the extra underscore isn't needed until further
notes are included.
May I suggest something like the code below (which works for me)
I have also added a button for the -- between syllables of a word
(especially where their separation would make it less comprehensible)
And changed the wording of the Lyric Tie button
Joe
;For Melismata Button - New RadioBox items plus change of button text
;InsertMelisma
(let ((choice (RadioBoxMenu
(cons (_ "During Word, with Slur") " -- ")
(cons (_ "Word End, with Slur") " __ ")
(cons (_ "During Word, No Slur") " -- _ ")
(cons (_ "Word End, No Slur") " __ _ ")
(cons (_ "Extend Melisma") " _ ")
)))
(if choice
(begin
(d-InsertTextInVerse choice)
(d-SetSaved #f))))
;For New DivideSyllablesWithHyphen Button
;InsertBetweenWordSyllables
(begin
(d-InsertTextInVerse " -- ")
(d-SetSaved #f))
;For Lyric Tie Button - change Button text
;InsertLyricTie
(let ((choice (RadioBoxMenu
(cons (_ "Printed as ˬ") "~")
(cons (_ "Printed as space") "_"))))
(if choice
(begin
(d-InsertTextInVerse choice)
(d-SetSaved #f))))
_______________________________________________
Denemo-devel mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/denemo-devel
