First version of new ui based on tailwind

This drops fomantic-ui as css toolkit and introduces tailwindcss. With
tailwind there are no predefined components, but it's very easy to
create those. So customizing the look&feel is much simpler, most of
the time no additional css is needed.

This requires a complete rewrite of the markup + styles. Luckily all
logic can be kept as is. The now old ui is not removed, it is still
available by using a request header `Docspell-Ui` with a value of `1`
for the old ui and `2` for the new ui.

Another addition is "dev mode", where docspell serves assets with a
no-cache header, to disable browser caching. This makes developing a
lot easier.
This commit is contained in:
Eike Kettner
2021-01-29 20:48:27 +01:00
parent 442b76c5af
commit dd935454c9
140 changed files with 15077 additions and 214 deletions

View File

@ -4,15 +4,19 @@ module Comp.PersonTable exposing
, emptyModel
, update
, view
, view2
)
import Api.Model.Person exposing (Person)
import Comp.Basic as B
import Data.Flags exposing (Flags)
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (onClick)
import Styles as S
import Util.Address
import Util.Contact
import Util.Html
type alias Model =
@ -102,3 +106,50 @@ renderPersonLine model person =
[ Util.Contact.toString person.contacts |> text
]
]
--- View2
view2 : Model -> Html Msg
view2 model =
table [ class S.tableMain ]
[ thead []
[ tr []
[ th [ class "w-px whitespace-nowrap" ] []
, th [ class "w-px whitespace-nowrap text-center pr-1 md:px-2" ]
[ text "Concerning"
]
, th [ class "text-left" ] [ text "Name" ]
, th [ class "text-left hidden sm:table-cell" ] [ text "Organization" ]
, th [ class "text-left hidden md:table-cell" ] [ text "Contact" ]
]
]
, tbody []
(List.map (renderPersonLine2 model) model.equips)
]
renderPersonLine2 : Model -> Person -> Html Msg
renderPersonLine2 model person =
tr
[ classList [ ( "active", model.selected == Just person ) ]
, class S.tableRow
]
[ B.editLinkTableCell (Select person)
, td [ class "w-px whitespace-nowrap text-center" ]
[ Util.Html.checkbox2 person.concerning
]
, td []
[ text person.name
]
, td [ class "hidden sm:table-cell" ]
[ Maybe.map .name person.organization
|> Maybe.withDefault "-"
|> text
]
, td [ class "hidden md:table-cell" ]
[ Util.Contact.toString person.contacts |> text
]
]