Current section

Files

Jump to
Raw

src/Ports.elm

port module Ports exposing (addUploadUrl, notifyUploadStatus, requestUrl)
import Json.Encode exposing (Value)
import Upload exposing (Upload, UploadExport, UploadId, UploadTarget, export)
port requestUrl : { id : UploadId, name : String } -> Cmd msg
port addUploadUrl : (UploadTarget -> msg) -> Sub msg
port uploadStatus : UploadExport -> Cmd msg
notifyUploadStatus : Upload -> Cmd msg
notifyUploadStatus upload =
uploadStatus (export upload)