TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-04-04 10:29:34 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix setting default in dropdown

Browse Source
This commit is contained in:
Eike Kettner 2020-09-01 21:59:31 +02:00
parent 237b960625
commit 8677eca6d4
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
modules/webapp/src/main/elm/Comp/ClassifierSettingsForm.elm
View File

@ -54,7 +54,7 @@ init flags sett =
in
( { enabled = sett.enabled
, categoryModel = Comp.FixedDropdown.initString []
, category = Nothing
, category = sett.category
, scheduleModel = cem
, schedule = Data.Validated.Unknown newSchedule
, itemCountModel = Comp.IntField.init (Just 0) Nothing True "Item Count"
@ -92,7 +92,12 @@ update flags msg model =
in
( { model
| categoryModel = Comp.FixedDropdown.initString categories
, category = List.head categories
, category =
if model.category == Nothing then
List.head categories
else
model.category
}
, Cmd.none
)