add latest TBC version of !Compatibility and !DebugTools

!Compatibility/errorHandler.lua

@@ -0,0 +1,46 @@
+--Cache global variables
+local strmatch = strmatch
+--WoW API
+local GetCVar = GetCVar
+local IsAddOnLoaded = IsAddOnLoaded
+local LoadAddOn = LoadAddOn
+
+local _ERROR_COUNT = 0
+local _ERROR_LIMIT = 1000
+
+function _ERRORMESSAGE_NEW(message)
+	debuginfo()
+
+	LoadAddOn("!DebugTools")
+	local loaded = IsAddOnLoaded("!DebugTools")
+
+	if (GetCVar("scriptErrors") == "1") then
+		if (not loaded or DEBUG_DEBUGTOOLS) then
+			ScriptErrors_Message:SetText(message)
+			ScriptErrors:Show()
+			if (DEBUG_DEBUGTOOLS) then
+				ScriptErrorsFrame_OnError(message)
+			end
+		else
+			ScriptErrorsFrame_OnError(message)
+		end
+	elseif (loaded) then
+		ScriptErrorsFrame_OnError(message, true)
+	end
+
+	_ERROR_COUNT = _ERROR_COUNT + 1
+	if (_ERROR_COUNT == _ERROR_LIMIT) then
+		StaticPopup_Show("TOO_MANY_LUA_ERRORS")
+	end
+
+	return message
+end
+
+seterrorhandler(_ERRORMESSAGE_NEW)
+
+function message(text)
+	if (not ScriptErrors:IsShown()) then
+		ScriptErrors_Message:SetText(text)
+		ScriptErrors:Show()
+	end
+end