Throttle search requests

Throttle search requests when typing. Also fix handling subscriptions
in main.
This commit is contained in:
Eike Kettner
2020-06-13 20:58:15 +02:00
parent 5468e24b55
commit 217fef7384
8 changed files with 160 additions and 132 deletions

View File

@ -45,12 +45,12 @@ init flags url key =
page =
checkPage flags im.page
( m, cmd ) =
( m, cmd, s ) =
if im.page == page then
App.Update.initPage im page
else
( im, Page.goto page )
( im, Page.goto page, Sub.none )
sessionCheck =
case m.flags.account of
@ -60,7 +60,7 @@ init flags url key =
Nothing ->
Cmd.none
in
( m
( { m | subs = s }
, Cmd.batch
[ cmd
, ic