ASUnitTests/CantDeleteService.applescript

   1 global HandyAdiumScripts
   2
   3 on run
   4         tell application "Adium"
   5                 try
   6                         delete service 1
   7                         error
   8                 on error number num --trap all errors
   9                         if num is -2700 then error -- if the error is the default error, caused by the 'error' directive, pass it along the chain
  10                         --otherwise, the command threw correctly
  11                 end try
  12         end tell
  13 end run