aligns, margins

This commit is contained in:
DieMyst 2020-12-02 12:10:25 +03:00
parent cbd60282b4
commit d547838e82
4 changed files with 10 additions and 6 deletions

View File

@ -26,7 +26,7 @@ view model id =
(instanceNum, instanceView) = Instances.View.view model (\service -> service.blueprint_id == id)
in
div [ classes "fl w-100 cf ph2-ns" ]
[ div [ classes "fl w-100 mb2" ]
[ div [ classes "fl w-100 mb2 pt2" ]
[ span [ classes "fl w-100 f1 lh-title dark-red" ] [ text ("Blueprint: " ++ bi.name) ]
, span [ classes "fl w-100 light-red" ] [ text bi.id ]
]

View File

@ -12,7 +12,7 @@ import Palette exposing (classes, redFont)
view : Model -> Html msg
view model =
div []
[ h1 [ redFont ] [ text "Developer Hub" ]
[ h1 [ redFont, classes "pt4" ] [ text "Developer Hub" ]
, welcomeText
, h3 [] [ text "Featured Blueprints" ]
, Blueprints.View.view model

View File

@ -24,7 +24,7 @@ view model id =
(instanceNum, instanceView) = Instances.View.view model filter
in
div [ classes "fl w-100 cf ph2-ns" ]
[ div [ classes "fl w-100 mb2"]
[ div [ classes "fl w-100 mb2 pt2"]
[ span [ classes "fl w-100 f1 lh-title dark-red" ] [ text ("Module: " ++ mi.name) ]
]
, div [ classes "fl w-100 bg-white mt2 mh2 ph4 pt3" ] [ viewInfo mi ]

View File

@ -17,7 +17,7 @@ limitations under the License.
-}
import Browser exposing (Document, UrlRequest(..))
import Html exposing (Html, div, header, img, p, text)
import Html exposing (Html, a, div, header, img, p, text)
import Html.Attributes exposing (attribute, style)
import Model exposing (Model, Route(..))
import Msg exposing (..)
@ -41,12 +41,16 @@ body model =
List.concat
[ [ header [ classes "w-100" ]
[ div [ classes "fl pa2 pb1 bg-white w-100" ]
[ div [ classes "fl mv1 pl3", style "max-width" "96px"] [img [ classes "v-mid dib mw-100 h-auto", attribute "src" "/images/logo_new.svg"] []]
[ div [ classes "fl mv1 pl3", style "max-width" "96px"]
[ a [ attribute "href" "/"]
[ img [ classes "v-mid dib mw-100 h-auto", attribute "src" "/images/logo_new.svg"] []
]
]
, div [ classes "fl pl5 h-100" ] [p [classes "mv2"] [text "Developer Hub"]]
]
]
]
, [div [ classes "w-100 ph4 pa2"] [routeView model model.page]]
, [div [ classes "w-100 pa4 pt2 mt2"] [routeView model model.page]]
]