TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-05-31 20:42:51 +00:00
Code Issues Packages Projects Releases Wiki Activity

Allow only one horizontal form being open

Browse Source
This commit is contained in:
Eike Kettner 2020-08-05 23:11:21 +02:00
parent 082f468155
commit dfbbcdf73c
1 changed files with 17 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
modules/webapp/src/main/elm/Comp/ItemDetail/Update.elm
View File

@ -705,6 +705,13 @@ update key flags next msg model =
newOpen =
not model.mailOpen
filesOpen =
if newOpen == True then
False
else
model.addFilesOpen
sendResult =
if newOpen then
model.mailSendResult
@ -715,6 +722,7 @@ update key flags next msg model =
noSub
( { model
| mailOpen = newOpen
, addFilesOpen = filesOpen
, mailSendResult = sendResult
}
, Cmd.none
@ -858,7 +866,15 @@ update key flags next msg model =
AddFilesToggle ->
noSub
( { model | addFilesOpen = not model.addFilesOpen }
( { model
| addFilesOpen = not model.addFilesOpen
, mailOpen =
if model.addFilesOpen == False then
False
else
model.mailOpen
}
, Cmd.none
)