Skip to content

Instantly share code, notes, and snippets.

@mpizenberg

mpizenberg/medium_checkIfNothingHappenedIn.elm

Created December 7, 2016 09:33
Show Gist options
  • Save mpizenberg/deadac606e56ef1da16c4c1e94cc946c to your computer and use it in GitHub Desktop.
Save mpizenberg/deadac606e56ef1da16c4c1e94cc946c to your computer and use it in GitHub Desktop.
Download ZIP
Medium Debounce
Raw
medium_checkIfNothingHappenedIn.elm
type Msg = Debounce VirtualTime | ...
-- create a deferred (by timeout) command taking currentVirtualTime as an argument
checkIfNothingHappenedIn : Time -> VirtualTime -> Cmd Msg
checkIfNothingHappenedIn timeout currentVirtualTime =
deferredCmd timeout (Debounce currentVirtualTime)
deferredCmd : Time -> Msg -> Cmd Msg
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment