TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-06-24 03:18:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Save name in item detail while typing

Browse Source
This commit is contained in:
Eike Kettner
2020-09-21 17:35:11 +02:00
parent 6b58bba1c8
commit 42a7a003a7
6 changed files with 193 additions and 106 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
modules/webapp/src/main/elm/Page/ItemDetail/Data.elm
View File

@ -3,7 +3,7 @@ module Page.ItemDetail.Data exposing (Model, Msg(..), emptyModel)
import Api.Model.ItemDetail exposing (ItemDetail)
import Browser.Dom as Dom
import Comp.ItemDetail
import Comp.ItemDetail.Update
import Comp.ItemDetail.Model
import Http
@ -20,6 +20,6 @@ emptyModel =
type Msg
= Init String
| ItemDetailMsg Comp.ItemDetail.Update.Msg
| ItemDetailMsg Comp.ItemDetail.Model.Msg
| ItemResp (Result Http.Error ItemDetail)
| ScrollResult (Result Dom.Error ())

6
modules/webapp/src/main/elm/Page/ItemDetail/Update.elm
View File

@ -3,7 +3,7 @@ module Page.ItemDetail.Update exposing (update)
import Api
import Browser.Navigation as Nav
import Comp.ItemDetail
import Comp.ItemDetail.Update
import Comp.ItemDetail.Model
import Data.Flags exposing (Flags)
import Data.UiSettings exposing (UiSettings)
import Page.ItemDetail.Data exposing (Model, Msg(..))
@ -21,7 +21,7 @@ update key flags next settings msg model =
flags
next
settings
Comp.ItemDetail.Update.Init
Comp.ItemDetail.Model.Init
model.detail
task =
@ -49,7 +49,7 @@ update key flags next settings msg model =
ItemResp (Ok item) ->
let
lmsg =
Comp.ItemDetail.Update.SetItem item
Comp.ItemDetail.Model.SetItem item
in
update key flags next settings (ItemDetailMsg lmsg) model