diff --git a/src/DOM/HTML/Event/DragEvent/DataTransfer.js b/src/DOM/HTML/Event/DragEvent/DataTransfer.js index 31c68f4..9c95d84 100644 --- a/src/DOM/HTML/Event/DragEvent/DataTransfer.js +++ b/src/DOM/HTML/Event/DragEvent/DataTransfer.js @@ -3,3 +3,7 @@ exports.files = function (dataTransfer) { return dataTransfer.files; }; + +exports.types = function (dataTransfer) { + return dataTransfer.types; +}; diff --git a/src/DOM/HTML/Event/DragEvent/DataTransfer.purs b/src/DOM/HTML/Event/DragEvent/DataTransfer.purs index 033330e..9792f6a 100644 --- a/src/DOM/HTML/Event/DragEvent/DataTransfer.purs +++ b/src/DOM/HTML/Event/DragEvent/DataTransfer.purs @@ -1,4 +1,8 @@ -module DOM.HTML.Event.DragEvent.DataTransfer where +module DOM.HTML.Event.DragEvent.DataTransfer + ( DataTransfer + , files + , types + ) where import DOM.File.Types (FileList) @@ -7,3 +11,7 @@ foreign import data DataTransfer :: * -- | Contains a list of all the local files available on the data transfer. -- | Empty if the drag operation doesn't involve dragging files. foreign import files :: DataTransfer -> FileList + +-- | Returns an array of data formats used in the drag operation. +-- | If the drag operation included no data, then the array is empty. +foreign import types :: DataTransfer -> Array String