From 2da22b3ba50d234a91bd9f380a65e14f33499af0 Mon Sep 17 00:00:00 2001 From: James Whitehead II Date: Fri, 24 Apr 2009 09:13:24 +0000 Subject: [PATCH] * Fix for world map issues with points of interest, etc. --- TomTom.lua | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/TomTom.lua b/TomTom.lua index 81aa77b..a75242b 100755 --- a/TomTom.lua +++ b/TomTom.lua @@ -328,8 +328,8 @@ local world_click_verify = { ["S"] = function() return IsShiftKeyDown() end, } -local origScript = WorldMapButton:GetScript("OnMouseUp") -WorldMapButton:SetScript("OnMouseUp", function(self, ...) +local origScript = WorldMapButton_OnClick +WorldMapButton_OnClick = function(self, ...) local mouseButton, button = ... if mouseButton == "RightButton" then -- Check for all the modifiers that are currently set @@ -351,7 +351,11 @@ WorldMapButton:SetScript("OnMouseUp", function(self, ...) else return origScript and origScript(self, ...) or true end -end) +end + +if WorldMapButton:GetScript("OnMouseUp") == origScript then + WorldMapButton:SetScript("OnMouseUp", WorldMapButton_OnClick) +end local function WaypointCallback(event, arg1, arg2, arg3) if event == "OnDistanceArrive" then -- 1.7.9.5