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

68
modules/webapp/src/main/elm/Comp/FixedDropdown.elm
View File

@ -7,10 +7,7 @@ module Comp.FixedDropdown exposing
, initString
, initTuple
, update
, view
, view2
, viewString
, viewStyled
, viewStyled2
)
@ -37,8 +34,7 @@ type alias Model a =
type Msg a
= SelectItem (Item a)
| SelectItem2 (Item a)
= SelectItem2 (Item a)
| ToggleMenu
| KeyPress (Maybe KeyCode)
@ -124,9 +120,6 @@ update msg model =
ToggleMenu ->
( { model | menuOpen = not model.menuOpen }, Nothing )
SelectItem item ->
( model, Just item.id )
SelectItem2 item ->
( { model | menuOpen = False }, Just item.id )
@ -170,65 +163,6 @@ update msg model =
( model, Nothing )
viewStyled : String -> Maybe (Item a) -> Model a -> Html (Msg a)
viewStyled classes selected model =
div
[ classList
[ ( "ui selection dropdown", True )
, ( classes, True )
, ( "open", model.menuOpen )
]
, tabindex 0
, onClick ToggleMenu
, onKeyUpCode KeyPress
]
[ input [ type_ "hidden" ] []
, i [ class "dropdown icon" ] []
, div
[ classList
[ ( "default", selected == Nothing )
, ( "text", True )
]
]
[ Maybe.map .display selected
|> Maybe.withDefault "Select…"
|> text
]
, div
[ classList
[ ( "menu transition", True )
, ( "hidden", not model.menuOpen )
, ( "visible", model.menuOpen )
]
]
<|
List.map (renderItems model) model.options
]
view : Maybe (Item a) -> Model a -> Html (Msg a)
view selected model =
viewStyled "" selected model
viewString : Maybe String -> Model String -> Html (Msg String)
viewString selected model =
view (Maybe.map (\s -> Item s s) selected) model
renderItems : Model a -> Item a -> Html (Msg a)
renderItems model item =
div
[ classList
[ ( "item", True )
, ( "selected", isSelected model item )
]
, onClick (SelectItem item)
]
[ text item.display
]
--- View2