mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-03-29 02:05:07 +00:00
parent
f78696b479
commit
b5f3c64058
@ -209,6 +209,9 @@ update mId key flags settings msg model =
|
||||
( sm, mv ) =
|
||||
Comp.FixedDropdown.update lm model.searchTypeDropdown
|
||||
|
||||
mvChange =
|
||||
Util.Maybe.filter (\a -> a /= model.searchTypeForm) mv
|
||||
|
||||
m0 =
|
||||
{ model
|
||||
| searchTypeDropdown = sm
|
||||
@ -216,7 +219,7 @@ update mId key flags settings msg model =
|
||||
}
|
||||
|
||||
next =
|
||||
case mv of
|
||||
case mvChange of
|
||||
Just BasicSearch ->
|
||||
Just
|
||||
( { m0 | contentOnlySearch = Nothing }
|
||||
|
Loading…
x
Reference in New Issue
Block a user