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

Remove old ui code in frontend

Browse Source
This commit is contained in:
Eike Kettner
2021-03-09 20:16:05 +01:00
parent ee694dc719
commit b95338e744
90 changed files with 50 additions and 11038 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
modules/webapp/src/main/elm/Comp/FieldListSelect.elm
View File

@ -2,7 +2,6 @@ module Comp.FieldListSelect exposing
( Model
, Msg
, update
, view
, view2
)
@ -10,7 +9,6 @@ import Comp.MenuBar as MB
import Data.Fields exposing (Field)
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (onCheck)
type alias Model =
@ -48,35 +46,6 @@ addField selected field =
--- View
view : Model -> Html Msg
view selected =
div [ class "grouped fields" ]
(List.map (fieldCheckbox selected) Data.Fields.all)
fieldCheckbox : Model -> Field -> Html Msg
fieldCheckbox selected field =
let
isChecked =
List.member field selected
in
div [ class "field" ]
[ div [ class "ui checkbox" ]
[ input
[ type_ "checkbox"
, checked isChecked
, onCheck (\_ -> Toggle field)
]
[]
, label [] [ text (Data.Fields.label field) ]
]
]
--- View2