Edit:Paste in AppleScript macro don't work?

[Nobumi Iyanaga]

Hello,

I wrote a little AppleScript macro that takes the selected text as 
argument, and returns a tagged text which should replace the selected 
text.  Here it is:

set thetext to ""
tell application "Nisus Writer Express"
        activate
        set thetext to get selected text of document 1
        if thetext is "" then
                return
        end if
        display dialog "Enter the tag name" default answer ""
        set thetag to the text returned of the result
        set the clipboard to "<" & thetag & ">" & thetext & "</" & thetag & ">"
        Do Menu Macro with macro "Edit:Paste"
end tell
This does work well except the last line,

Do Menu Macro with macro "Edit:Paste"

I have to press CMD + V to replace the selected text with the tagged 
text.  Am I missing something obvious?  Is this only on my machine?  Or 
is the 'Do Menu Macro with macro "Edit:Paste"' command broken?

Thank you in advance!

Best regards,

Nobumi Iyanaga
Tokyo,
Japan
---------------------------------------------------
The Nisus Interactive List
[EMAIL PROTECTED]
Searchable archives:
http://www.mail-archive.com/nisus-interactive%40nisus.com/
To unsubscribe from this list please send a message with "unsubscribe
nisus-interactive" in the body of the email to [EMAIL PROTECTED]