dashboard/src/HubPage/View.elm

33 lines
1.1 KiB
Elm
Raw Normal View History

module HubPage.View exposing (..)
import Html exposing (Html)
import HubPage.Model exposing (Model)
import HubPage.Msg exposing (Msg)
import Modules.Model exposing (Module)
import Modules.View
import Services.Model exposing (Service)
import Services.View
servicesExample : List Service
servicesExample =
[ { name = "SQLite", author = "Company Inc", instanceNumber = 2 }
, { name = "Redis", author = "Roga Kopita", instanceNumber = 3 }
, { name = "Chat", author = "Fluence Labs", instanceNumber = 5 }
, { name = "Imagemagick", author = "Magic Corp", instanceNumber = 0 }
]
modulesExample : List Module
modulesExample =
[ { name = "sqlite3", instanceNumber = 2 }
, { name = "ipfs_adapter", instanceNumber = 3 }
, { name = "mariadb_adapter", instanceNumber = 5 }
, { name = "chat_history", instanceNumber = 1 }
, { name = "user_list", instanceNumber = 1 }
, { name = "basic_auth", instanceNumber = 0 }
]
view : Model -> Html msg
view model = Html.div []
[ Services.View.view {services = servicesExample}
, Modules.View.view {modules = modulesExample }
]