src/Library/TaskPort/Extra.elm at main · tokono.ma/diffuse

tokono.ma / diffuse

A music player that connects to your cloud/distributed storage.

diffuse / src / Library / TaskPort / Extra.elm

at main 458 B view raw

 1module TaskPort.Extra exposing (..)
 2
 3import TaskPort
 4
 5
 6errorToStringCustom : TaskPort.Error -> String
 7errorToStringCustom err =
 8    case err of
 9        TaskPort.JSError jsErr ->
10            case jsErr of
11                TaskPort.ErrorObject _ errRecord ->
12                    errRecord.message
13
14                TaskPort.ErrorValue _ ->
15                    TaskPort.errorToString err
16
17        TaskPort.InteropError _ ->
18            TaskPort.errorToString err