Don't trigger search when fields are cleared

This commit is contained in:
Eike Kettner 2020-06-23 23:49:10 +02:00
parent 6846f2f46e
commit b8558d6837

View File

@ -480,7 +480,7 @@ update flags settings msg model =
( { model | nameModel = next } ( { model | nameModel = next }
, Cmd.none , Cmd.none
) )
(model.nameModel /= Nothing && str == "") False
SetAllName str -> SetAllName str ->
let let
@ -491,7 +491,7 @@ update flags settings msg model =
( { model | allNameModel = next } ( { model | allNameModel = next }
, Cmd.none , Cmd.none
) )
(model.allNameModel /= Nothing && str == "") False
SetFulltext str -> SetFulltext str ->
let let
@ -502,7 +502,7 @@ update flags settings msg model =
( { model | fulltextModel = next } ( { model | fulltextModel = next }
, Cmd.none , Cmd.none
) )
(model.fulltextModel /= Nothing && str == "") False
KeyUpMsg (Just Enter) -> KeyUpMsg (Just Enter) ->
NextState ( model, Cmd.none ) True NextState ( model, Cmd.none ) True