A music player that connects to your cloud/distributed storage. diffuse.sh
Something went wrong. Try again.
1234567891011121314151617181920212223242526272829module Task.Extra exposing (do, doDelayed, fromResult)
import Processimport Task
-- 🔱
do : msg -> Cmd msgdo msg = Task.perform identity (Task.succeed msg)
doDelayed : Float -> msg -> Cmd msgdoDelayed delay msg = Task.perform (always msg) (Process.sleep delay)
fromResult : Result error value -> Task.Task error valuefromResult result = case result of Ok v -> Task.succeed v
Err e -> Task.fail e