Initial outline for managing spaces

This commit is contained in:
Eike Kettner
2020-07-05 00:37:27 +02:00
parent d43e17d9fb
commit 0e8c9b1819
9 changed files with 457 additions and 11 deletions

View File

@ -19,6 +19,8 @@ module Data.Icons exposing
, organizationIcon
, person
, personIcon
, space
, spaceIcon
, tag
, tagIcon
, tags
@ -29,6 +31,16 @@ import Html exposing (Html, i)
import Html.Attributes exposing (class)
space : String
space =
"folder outline icon"
spaceIcon : String -> Html msg
spaceIcon classes =
i [ class (space ++ " " ++ classes) ] []
concerned : String
concerned =
"crosshairs icon"