From edbca6bc50a2f9e08f13c6d99729da103390a248 Mon Sep 17 00:00:00 2001
From: Gary Burgess <gary.burgess@gmail.com>
Date: Sat, 22 Aug 2015 11:41:23 +0100
Subject: [PATCH] Fix #12 incorrect effect rows in eventListener

Thanks for pointing this out @nwolverson!
---
 src/DOM/Event/EventTarget.purs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/DOM/Event/EventTarget.purs b/src/DOM/Event/EventTarget.purs
index 3d5048e..bb2b7ce 100644
--- a/src/DOM/Event/EventTarget.purs
+++ b/src/DOM/Event/EventTarget.purs
@@ -13,7 +13,7 @@ import DOM.Event.Types
 foreign import data EventListener :: # ! -> *
 
 -- | Creates an EventListener from a normal PureScript Eff function.
-foreign import eventListener :: forall eff a. (Event -> Eff (dom :: DOM) a) -> EventListener eff
+foreign import eventListener :: forall eff a. (Event -> Eff (dom :: DOM | eff) a) -> EventListener (dom :: DOM | eff)
 
 -- | Adds a listener to an event target. The boolean argument indicates whether
 -- | the listener should be added for the "capture" phase.