fix bps and modules elements, fix table

This commit is contained in:
DieMyst 2020-12-04 16:16:25 +03:00
parent 4206408465
commit 705d58e1b2
4 changed files with 7 additions and 7 deletions

View File

@ -35,7 +35,7 @@ view model =
viewService : BlueprintInfo -> Html msg
viewService blueprint =
div [ classes "fl w-third-ns pr3 lucida" ]
div [ classes "fl w-third pr3 lucida" ]
[ a [ attribute "href" ("/blueprint/" ++ blueprint.id), classes "fl w-100 bg-white black mw6 mr3 mb3 ph4 hide-child pa2 br3 element-box ba b--white bw1 no-underline" ]
[ div [ classes "w-100 mb3 pt1 b" ] [ text blueprint.name ]
, div [ classes "w-100 mb4" ] [ text "By ", span [classes "b"] [text blueprint.author] ]

View File

@ -7,7 +7,7 @@ import Html.Attributes exposing (attribute)
import Instances.Model exposing (Instance)
import Model exposing (Model)
import Nodes.Model exposing (Identify)
import Palette exposing (classes)
import Palette exposing (classes, shortHashRaw)
import Service.Model exposing (Service)
@ -42,8 +42,8 @@ view model filter =
viewTable : List Instance -> Html msg
viewTable instances =
div [ classes "pa1 mt2 bg-white br3" ]
[ div [ classes "mw8 pa2 " ]
[ table [ classes "f6 w-100 center", attribute "cellspacing" "0" ]
[ div [ classes "mw8-ns pa2 " ]
[ table [ classes "f6 w-100 center ws-normal-ns", attribute "cellspacing" "0" ]
[ thead []
[ tr [ classes "" ]
[ th [ classes "fw6 tl pa3 gray" ] [ text "SERVICE" ]
@ -63,6 +63,6 @@ viewInstance instance =
tr [ classes "" ]
[ td [ classes "ph3" ] [ p [classes "ws-normal"] [text instance.name ]]
, td [ classes "ph3" ] [ p [classes "ws-normal"] [text instance.instance ]]
, td [ classes "ph3" ] [ p [classes "ws-normal"] [text instance.peerId ]]
, td [ classes "ph3" ] [ p [classes "ws-normal"] [text (shortHashRaw 8 instance.peerId) ]]
, td [ classes "ph3" ] [ p [classes "ws-normal"] [text instance.ip ]]
]

View File

@ -59,7 +59,7 @@ view modules =
viewService : ModuleShortInfo -> Html msg
viewService moduleInfo =
div [ classes "fl w-third-ns pr3" ]
div [ classes "fl w-third pr3" ]
[ a [ attribute "href" ("/module/" ++ moduleInfo.moduleInfo.name), classes "fl w-100 bg-white black mw6 mr2 mb3 ph4 hide-child pa2 br3 element-box ba b--white bw1" ]
[ p [ classes "tl di" ] [ div [ classes "fl b w-100 mb1" ] [ text moduleInfo.moduleInfo.name ], div [ classes "fl w-100 mt1 lucida gray" ] [ instancesText moduleInfo.instanceNumber ] ]
]

View File

@ -56,7 +56,7 @@ body model =
layout : List (Html Msg) -> Html Msg
layout elms =
div [ classes "mw8 center w-100" ]
div [ classes "mw8-ns center w-100" ]
[ div [ classes "fl w-100 bg-near-white" ]
([]
++ elms