NetNewsWire/Tests/NetNewsWireTests/ScriptingTests/scripts/testCurrentArticleIsNil.app...

24 lines
838 B
AppleScript
Raw Normal View History

-- this script tests that it is possible to get the url property of the current article
-- it uses system event accessibility scripting to set up the main window
-- one needs to authorize scripting accessibility control in the System Preferences'
-- Privacy and security pane
try
2018-08-29 07:18:24 +02:00
tell application "NetNewsWire"
set shouldBeMissingValue to current article
end tell
--verify that the current article is in fact 'missing vcalue'
if shouldBeMissingValue is missing value then
set the_message to "passed tests"
set the_result to true
else
set the_message to "expected current article to be 'missing value'"
set the_result to false
end if
on error message
return {test_result:false, script_result:message}
end try
return {test_result:the_result, script_result:the_message}