ASUnitTests/CheckChatWindowCloses.applescript

   1 global HandyAdiumScripts
   2
   3 on run
   4         tell application "Adium"
   5                 set newChatWindow to HandyAdiumScripts's makeNewChatWindow()
   6                 set c to count of chat windows
   7                 close newChatWindow
   8                 delay 1
   9                 if (count of chat windows) is not c - 1 then error ("Count of chat windows is " & (count of chat windows) & " when it should be " & (c - 1))
  10         end tell
  11 end run