NetNewsWire/EvergreenTests/ScriptingTests/scripts/selectAFeed.applescript

33 lines
677 B
AppleScript
Raw Normal View History

property uparrowKeyCode : 126
property downarrowKeyCode : 125
property rightarrowKeyCode : 124
property leftarrowKeyCode : 123
to activateEvergreen()
tell application "Evergreen"
activate
end tell
end activateEvergreen
to multipleKeyCodes(keycode, numberOfKeys)
tell application "System Events"
tell process "Evergreen"
repeat numberOfKeys times
key code keycode
end repeat
end tell
end tell
end multipleKeyCodes
try
activateEvergreen()
multipleKeyCodes(downarrowKeyCode, 9)
multipleKeyCodes(uparrowKeyCode, 1)
on error message
return {test_result:false, script_result:message}
end try
return {test_result:true, script_result:"selected feed"}