From 8327bdd829d33cdac5b283adf61cbea598c17d1f Mon Sep 17 00:00:00 2001 From: nukisman Date: Thu, 27 Dec 2018 15:24:13 +0300 Subject: [PATCH] targetFiles EventFn Ability to get selected files from input --- src/React/Basic/DOM/Events.purs | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/React/Basic/DOM/Events.purs b/src/React/Basic/DOM/Events.purs index 55fa568..6423527 100644 --- a/src/React/Basic/DOM/Events.purs +++ b/src/React/Basic/DOM/Events.purs @@ -48,6 +48,7 @@ import Effect.Unsafe (unsafePerformEffect) import React.Basic.Events (EventFn, SyntheticEvent, unsafeEventFn) import Unsafe.Coerce (unsafeCoerce) import Web.Event.Internal.Types (Event, EventTarget) +import Web.File.FileList (FileList) -- | General event fields @@ -111,6 +112,9 @@ targetChecked = unsafeEventFn \e -> toMaybe (unsafeCoerce e).target.checked targetValue :: EventFn SyntheticEvent (Maybe String) targetValue = unsafeEventFn \e -> toMaybe (unsafeCoerce e).target.value +targetFiles :: EventFn SyntheticEvent (Maybe FileList) +targetFiles = unsafeEventFn \e -> toMaybe (unsafeCoerce e).target.files + timeStamp :: EventFn SyntheticEvent Number timeStamp = unsafeEventFn \e -> (unsafeCoerce e).timeStamp