Bag Lua Problem

[hairy_palms]

ive written an addon to try and open/close my bags when i go to the AH or mail or vendor, so far it works 50%, the bags open perfectly, but they dont close when i leave the vendor/AH, can anyone see where ive gone wrong?

--------------
--Opening
--------------
local opensackframe = CreateFrame("FRAME", "openmysack");

opensackframe:RegisterEvent("AUCTION_HOUSE_SHOW")
opensackframe:RegisterEvent("BANKFRAME_OPENED")
opensackframe:RegisterEvent("GUILDBANKFRAME_OPENED")
opensackframe:RegisterEvent("MAIL_SHOW")
opensackframe:RegisterEvent("MERCHANT_SHOW")
opensackframe:RegisterEvent("TRADE_SHOW")

local function openeventHandler(self, event, ...)
	OpenAllBags(true)
end
opensackframe:SetScript("OnEvent", openeventHandler);

--------------
--Closing
--------------

local closesackframe = CreateFrame("FRAME2", "closemysack");

closesackframe:RegisterEvent("AUCTION_HOUSE_CLOSED")
closesackframe:RegisterEvent("BANKFRAME_CLOSED")
closesackframe:RegisterEvent("GUILDBANKFRAME_CLOSED")
closesackframe:RegisterEvent("MAIL_CLOSED")
closesackframe:RegisterEvent("MERCHANT_CLOSED")
closesackframe:RegisterEvent("TRADE_CLOSE")

local function closeeventHandler(self, event, ...)
	CloseAllBags()
end
closesackframe:SetScript("OnEvent", closeeventHandler);

the CloseAllBags() never seems to get called.