Add addEventListener variant with options exposed (#25)

* Add addEventListener variant with options exposed

* Add changelog entry

Author: JordanMartinez

CHANGELOG.md

@@ -8,6 +8,7 @@ Breaking changes:
 - Migrate FFI to ES modules (#24 by @JordanMartinez)
 
 New features:
+- Add `addEventListenerWithOptions` to expose more options (#25 by @JordanMartinez)
 
 Bugfixes:
 

src/Web/Event/EventTarget.js

@@ -6,6 +6,18 @@ export function eventListener(fn) {
   };
 }
 
+export function addEventListenerWithOptions(type) {
+  return function (listener) {
+    return function (options) {
+      return function (target) {
+        return function () {
+          return target.addEventListener(type, listener, options);
+        };
+      };
+    };
+  };
+}
+
 export function addEventListener(type) {
   return function (listener) {
     return function (useCapture) {

src/Web/Event/EventTarget.purs

@@ -3,6 +3,7 @@ module Web.Event.EventTarget
   , EventListener
   , eventListener
   , addEventListener
+  , addEventListenerWithOptions
   , removeEventListener
   , dispatchEvent
   ) where
@@ -29,6 +30,21 @@ foreign import eventListener
    . (Event -> Effect a)
   -> Effect EventListener
 
+-- | Adds a listener to an event target.
+-- | - `capture` - whether the listener is added to the "capture" phase
+-- | - `once` - if true, indicates listener should be invokved at most once
+-- |            before being automatically removed.
+-- | - `passive` - indicates the callback function will never call `preventDefault`
+foreign import addEventListenerWithOptions
+  :: EventType
+  -> EventListener
+  -> { capture :: Boolean
+     , once :: Boolean
+     , passive :: Boolean
+     }
+  -> EventTarget
+  -> Effect Unit
+
 -- | Adds a listener to an event target. The boolean argument indicates whether
 -- | the listener should be added for the "capture" phase.
 foreign import addEventListener