TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-06-05 22:55:58 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix typo in search menu

Browse Source
This commit is contained in:
Eike Kettner 2020-03-22 21:08:01 +01:00
parent a165f87fea
commit 9a99c852a8
1 changed files with 72 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

87
modules/webapp/src/main/elm/Comp/SearchMenu.elm
View File

@ -60,7 +60,11 @@ emptyModel =
, tagExclModel = makeTagModel , tagExclModel = makeTagModel
, directionModel = , directionModel =
Comp.Dropdown.makeSingleList Comp.Dropdown.makeSingleList
{ makeOption = \entry -> { value = Data.Direction.toString entry, text = Data.Direction.toString entry } { makeOption =
\entry ->
{ value = Data.Direction.toString entry
, text = Data.Direction.toString entry
}
, options = Data.Direction.all , options = Data.Direction.all
, placeholder = "Choose a direction…" , placeholder = "Choose a direction…"
, selected = Nothing , selected = Nothing
@ -89,7 +93,7 @@ emptyModel =
, searchable = \n -> n > 5 , searchable = \n -> n > 5
, makeOption = \e -> { value = e.id, text = e.name } , makeOption = \e -> { value = e.id, text = e.name }
, labelColor = \_ -> "" , labelColor = \_ -> ""
, placeholder = "Choosa an equipment" , placeholder = "Choose an equipment"
} }
, inboxCheckbox = False , inboxCheckbox = False
, fromDateModel = Comp.DatePicker.emptyModel , fromDateModel = Comp.DatePicker.emptyModel
@ -204,7 +208,12 @@ update flags msg model =
Comp.DatePicker.init Comp.DatePicker.init
in in
noChange noChange
( { model | untilDateModel = dp, fromDateModel = dp, untilDueDateModel = dp, fromDueDateModel = dp } ( { model
| untilDateModel = dp
, fromDateModel = dp
, untilDueDateModel = dp
, fromDueDateModel = dp
}
, Cmd.batch , Cmd.batch
[ Api.getTags flags "" GetTagsResp [ Api.getTags flags "" GetTagsResp
, Api.getOrgLight flags GetOrgResp , Api.getOrgLight flags GetOrgResp
@ -279,49 +288,77 @@ update flags msg model =
( m2, c2 ) = ( m2, c2 ) =
Comp.Dropdown.update m model.tagInclModel Comp.Dropdown.update m model.tagInclModel
in in
NextState ( { model | tagInclModel = m2 }, Cmd.map TagIncMsg c2 ) (isDropdownChangeMsg m) NextState
( { model | tagInclModel = m2 }
, Cmd.map TagIncMsg c2
)
(isDropdownChangeMsg m)
TagExcMsg m -> TagExcMsg m ->
let let
( m2, c2 ) = ( m2, c2 ) =
Comp.Dropdown.update m model.tagExclModel Comp.Dropdown.update m model.tagExclModel
in in
NextState ( { model | tagExclModel = m2 }, Cmd.map TagExcMsg c2 ) (isDropdownChangeMsg m) NextState
( { model | tagExclModel = m2 }
, Cmd.map TagExcMsg c2
)
(isDropdownChangeMsg m)
DirectionMsg m -> DirectionMsg m ->
let let
( m2, c2 ) = ( m2, c2 ) =
Comp.Dropdown.update m model.directionModel Comp.Dropdown.update m model.directionModel
in in
NextState ( { model | directionModel = m2 }, Cmd.map DirectionMsg c2 ) (isDropdownChangeMsg m) NextState
( { model | directionModel = m2 }
, Cmd.map DirectionMsg c2
)
(isDropdownChangeMsg m)
OrgMsg m -> OrgMsg m ->
let let
( m2, c2 ) = ( m2, c2 ) =
Comp.Dropdown.update m model.orgModel Comp.Dropdown.update m model.orgModel
in in
NextState ( { model | orgModel = m2 }, Cmd.map OrgMsg c2 ) (isDropdownChangeMsg m) NextState
( { model | orgModel = m2 }
, Cmd.map OrgMsg c2
)
(isDropdownChangeMsg m)
CorrPersonMsg m -> CorrPersonMsg m ->
let let
( m2, c2 ) = ( m2, c2 ) =
Comp.Dropdown.update m model.corrPersonModel Comp.Dropdown.update m model.corrPersonModel
in in
NextState ( { model | corrPersonModel = m2 }, Cmd.map CorrPersonMsg c2 ) (isDropdownChangeMsg m) NextState
( { model | corrPersonModel = m2 }
, Cmd.map CorrPersonMsg c2
)
(isDropdownChangeMsg m)
ConcPersonMsg m -> ConcPersonMsg m ->
let let
( m2, c2 ) = ( m2, c2 ) =
Comp.Dropdown.update m model.concPersonModel Comp.Dropdown.update m model.concPersonModel
in in
NextState ( { model | concPersonModel = m2 }, Cmd.map ConcPersonMsg c2 ) (isDropdownChangeMsg m) NextState
( { model | concPersonModel = m2 }
, Cmd.map ConcPersonMsg c2
)
(isDropdownChangeMsg m)
ConcEquipmentMsg m -> ConcEquipmentMsg m ->
let let
( m2, c2 ) = ( m2, c2 ) =
Comp.Dropdown.update m model.concEquipmentModel Comp.Dropdown.update m model.concEquipmentModel
in in
NextState ( { model | concEquipmentModel = m2 }, Cmd.map ConcEquipmentMsg c2 ) (isDropdownChangeMsg m) NextState
( { model | concEquipmentModel = m2 }
, Cmd.map ConcEquipmentMsg c2
)
(isDropdownChangeMsg m)
ToggleInbox -> ToggleInbox ->
let let
@ -343,7 +380,11 @@ update flags msg model =
_ -> _ ->
Nothing Nothing
in in
NextState ( { model | fromDateModel = dp, fromDate = nextDate }, Cmd.none ) (model.fromDate /= nextDate) NextState
( { model | fromDateModel = dp, fromDate = nextDate }
, Cmd.none
)
(model.fromDate /= nextDate)
UntilDateMsg m -> UntilDateMsg m ->
let let
@ -358,7 +399,11 @@ update flags msg model =
_ -> _ ->
Nothing Nothing
in in
NextState ( { model | untilDateModel = dp, untilDate = nextDate }, Cmd.none ) (model.untilDate /= nextDate) NextState
( { model | untilDateModel = dp, untilDate = nextDate }
, Cmd.none
)
(model.untilDate /= nextDate)
FromDueDateMsg m -> FromDueDateMsg m ->
let let
@ -373,7 +418,11 @@ update flags msg model =
_ -> _ ->
Nothing Nothing
in in
NextState ( { model | fromDueDateModel = dp, fromDueDate = nextDate }, Cmd.none ) (model.fromDueDate /= nextDate) NextState
( { model | fromDueDateModel = dp, fromDueDate = nextDate }
, Cmd.none
)
(model.fromDueDate /= nextDate)
UntilDueDateMsg m -> UntilDueDateMsg m ->
let let
@ -388,7 +437,11 @@ update flags msg model =
_ -> _ ->
Nothing Nothing
in in
NextState ( { model | untilDueDateModel = dp, untilDueDate = nextDate }, Cmd.none ) (model.untilDueDate /= nextDate) NextState
( { model | untilDueDateModel = dp, untilDueDate = nextDate }
, Cmd.none
)
(model.untilDueDate /= nextDate)
SetName str -> SetName str ->
let let
@ -399,7 +452,11 @@ update flags msg model =
else else
Just str Just str
in in
NextState ( { model | nameModel = next }, Cmd.none ) (model.nameModel /= next) NextState
( { model | nameModel = next }
, Cmd.none
)
(model.nameModel /= next)