Mercurial > wow > squawk
view Tests.lua @ 9:c535960b1245
syntax fix
author | wobin |
---|---|
date | Sun, 19 Apr 2009 02:50:40 +1000 |
parents | d19385c4a282 |
children | 2231fd3f139b |
line wrap: on
line source
-- Tests for Squawk if not Squawk then return end --[[ --Tests we need to do: -- -- Add a follower -- Remove a follower -- Request to follow someone -- Recieve a request from a follower -- Send a Squawk -- Recieve a direct Squawk -- Send a Squawk to the Guild -- Recieve a Squawk from the Guild --]] -- SquawkTester = LibStub("AceAddon-3.0", "AceComm-3.0", "AceConsole-3.0") local Test = SquawkTester function Test:OnInitialize() self:RegisterComm("Squawk", ReceiveMessage) self:RegisterSlashCommand("TestSquawk", "RunTests") end function Test:RunTests() AddPublicFollower() RemovePublicFollower() AddPrivateFollower() ApprovePendingRequest() end function Test:AddPublicFollower() Squawk.Settings.Private = false Squawk.Controller:IWantToFollowThem(UnitName("player")) end function Test:RemovePublicFollower() Squawk.Controller:IWantToUnfollowThem(UnitName("player")) end function Test:AddPrivateFollower() Squawk.Settings.Private = true Squawk.Controller:IWantToFollowThem(UnitName("player")) end function Test:ApprovePendingRequest() Squawk.Controller:ApprovePendingRequest(Name) end function Test:ReceiveMessage(Prefix, Message, Distribution, Sender) end function Test:SendMessageDirectly(Message) end