implement remove event lua function

modules/core/dispatcher.lua

@@ -1,28 +1,40 @@
-local eventId = 1
-local events = { }
+local eventId = 0
+local eventsTable = { }
 local orig = { scheduleEvent = scheduleEvent,
                addEvent = addEvent }
 
 -- fix original scheduleEvent
 function scheduleEvent(func, delay)
   eventId = eventId + 1
-    local id = eventId + 1
+  local id = eventId
   local function proxyFunc()
+      if eventsTable[id] then
         func()
-        table[id] = nil
+        eventsTable[id] = nil
       end
-    table[id] = proxyFunc
+  end
+  eventsTable[id] = proxyFunc
   orig.scheduleEvent(proxyFunc, delay)
+  return id
+end
+
+function removeEvent(id)
+  if id and eventsTable[id] then
+    eventsTable[id] = nil
+  end
 end
 
 -- fix original addEvent
 function addEvent(func)
     eventId = eventId + 1
-    local id = eventId + 1
+    local id = eventId
     local function proxyFunc()
+        if eventsTable[id] then
           func()
-        table[id] = nil
+          eventsTable[id] = nil
         end
-    table[id] = proxyFunc
+    end
+    eventsTable[id] = proxyFunc
     orig.addEvent(proxyFunc)
+    return id
 end

modules/textmessage/textmessage.lua

@@ -18,6 +18,7 @@ local messageTypes = {
   { type = 'MessageBlue', color = '#3264C8', showOnConsole = true, showOnWindow = false },
   { type = 'MessageRed', color = '#C83200', showOnConsole = true, showOnWindow = false }
 }
+local hideEvent
 
 -- public functions
 function TextMessage.create()
@@ -47,11 +48,11 @@ function Game.onTextMessage(type, message)
     label:setVisible(true)
     label:setForegroundColor(messageType.color)
     label:setText(message)
-
     label:setStyle(messageType.windowLocation)
 
     time = #message * 75
-    scheduleEvent(function()
+    removeEvent(hideEvent)
+    hideEvent = scheduleEvent(function()
                     label:setVisible(false)
                   end, time)
   end