Re: [Denemo-devel] Scheme script debugging

[Andreas Schneider]

Am 23.05.2013 10:31, schrieb Richard Shann:
> Yes, commands like Notes/Rests->Comment use that. You can even include
> snippets of music to be typeset by LilyPond with one of them.

I tried to imitate Score -> Comment by including DENEMO_OVERRIDE_EDITOR,
but it does not work. I realize that Score -> Comment does not call
d-GetUserInput directly. Notes/Rests -> Comment does not show the editor
I want.

>> What I still do not understand is the button. I have View -> Titles
>> Buttons etc activated. When I execute the script, the button MarkupAtEnd
>> appears for a short time (something like a second) and then disappears
>> again.
> Wow! Can you post the exact script you have ended with for me to try?

After having a closer look, I saw that the button appears when the
script starts, is present when I type in the d-GetUserInput window, and
disappears afterwards (probably at finishing the script). Here's the source:

;;;MarkupAtEnd
(let ((tag "MarkupAtEnd")(themarkup #f))
        (d-DirectivePut-movementcontrol-override tag (logior
DENEMO_OVERRIDE_GRAPHIC DENEMO_OVERRIDE_EDITOR))
        (d-DirectivePut-movementcontrol-display tag "MarkupAtEnd")
        (disp "checking previous markup ...")
        (if (d-Directive-movementcontrol? tag)
                (set! themarkup (d-DirectiveGet-movementcontrol-postfix
tag))

                (set! themarkup (""))

        )
        (set! themarkup (d-GetUserInput (_ "MarkupAtEnd") (_ "Edit
markup:") themarkup))
        (disp themarkup)
        (d-DirectivePut-movementcontrol-postfix tag themarkup)
        (d-DirectivePut-movementcontrol-override tag DENEMO_OVERRIDE_AFFIX)
        (d-SetSaved #f)
)

Andreas