applescript Unterprogramm und Aktion Eigenschaften

Question

Ich bin mit einer Aktion Eigenschaften Fehler mit meinem kleinen AppleScript stecken. Hier ist das Skript:

tell application "evernote" to activate 
tell application "System Events" 
    --tell process "evernote" 
    set the clipboard to text_content() 
    keystroke "v" using command down 
    keystroke return 
    --end tell 
end tell 
return input 
end run 

hier Unterroutine nach Hauptprogramm

on text_content() 

delay 1 

tell application "Safari" to set theURL to URL of front document 
set theDate to do shell script "date +'%d-%m-%Y'' - '%T" 
set theusertext to " , " 
set get_text to (theURL & return & theusertext & theDate) as string 
return get_text 

end text_content 

Dies zeigt mir eine Aktion Eigenschaften Fehler. Ich habe versucht, get_text als Eigenschaften an verschiedenen Stellen im Skript zu definieren, aber immer noch den gleichen Fehler. Irgendwelche Hinweise, wie man damit umgehen soll?

Answer 1

Dies funktioniert für mich in Evernote 6.6.1 (453372) auf OSX 10.11.4, entweder aus dem Skript-Menü oder Skript-Editor.

--- GET THE INFO FROM SAFARI FIRST --- 

set the clipboard to (text_content() & return) 

tell application "Evernote" to activate 
tell application "System Events" 
    tell process "evernote" 
     keystroke "v" using command down 
     delay 0.5 

     --- Evernote is NOT behaving properly --- 
     -- It should leave the cursor at the END of the paste 
     -- but it is not. 
     -- So, we have to arrow down then issue a return 
     -- The above delay is also required to make sure the paste 
     -- has completed before any more keystrokes 

     key code 125 -- DOWN arrow 
     keystroke return 

    end tell 
end tell 


on text_content() 

    --delay 1  ## don't see any need for this 

    tell application "Safari" to set theURL to URL of front document 
    set theDate to do shell script "date +'%d-%m-%Y'' - '%T" 
    set theusertext to " , " 
    set get_text to (theURL & return & theusertext & theDate) as string 
    return get_text 

end text_content