diff --git a/src/App/Container.purs b/src/App/Container.purs index b29b728..b77990f 100644 --- a/src/App/Container.purs +++ b/src/App/Container.purs @@ -247,7 +247,17 @@ render state render_nav = HH.slot _nav unit NavigationInterface.component unit NavigationInterfaceEvent render_header :: forall monad. MonadAff monad => H.ComponentHTML Action ChildSlots monad - render_header = Bulma.small_hero "net libre" "Providing free domains since 2015!" + render_header = + HH.section [ HP.classes (C.hero <> C.is_info <> C.is_small) ] + [ HH.div [ HP.classes C.hero_body ] + [ HH.div [ HP.classes $ C.container <> C.has_text_centered ] + [ HH.p [ HP.classes C.subtitle ] + [ HH.strong_ [ HH.u_ [ HH.text "net libre" ]] + , HH.text ": providing free domains since 2015!" + ] + ] + ] + ] render_logs :: forall monad. MonadAff monad => H.ComponentHTML Action ChildSlots monad render_logs = Bulma.container [ HH.slot_ _log unit AppLog.component unit ]