ASUnitTests/DeleteAccount.applescript

   1 global HandyAdiumScripts
   2
   3 on run
   4         tell application "Adium"
   5                 set newAccount to HandyAdiumScripts's makeTemporaryAccount()
   6                 set c to count accounts
   7                 delete newAccount
   8                 if (count accounts) is not c - 1 then
   9                         --it's possible that something bad happened
  10                         --because I couldn't delete the account I created
  11                         --however, there's nothing I can do about it. I'll
  12                         --print a message to the user, though.
  13                         do script "echo 'It is possible that an extra temporary account has been created by running this unit test. Please delete the account " & (get the name of newAccount) & " and fix the account creation or deletion code."
  14                         error
  15                 end
  16         end tell
  17 end run