applied pr feedback

IntersectMBO · Jun 8, 2021 · 5c77421 · 5c77421
1 parent 3e3e9ce
commit 5c77421
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 8 deletions.
diff --git a/marlowe-playground-client/src/Home.purs b/marlowe-playground-client/src/Home.purs
@@ -14,16 +14,16 @@ import Projects.Types (Lang(..))
 
 render :: forall m. State -> ComponentHTML Action ChildSlots m
 render state =
-  div [ classNames [ "flex", "flex-col", "items-center" ] ]
-    [ h1 [ classNames [ "font-semibold", "text-4xl", "my-16" ] ] [ text "Get started" ]
+  div [ classNames [ "flex", "flex-col", "items-center", "my-16" ] ]
+    [ h1 [ classNames [ "font-semibold", "text-4xl", "mb-16" ] ] [ text "Get started" ]
     , div [ classNames [ "mb-6" ] ]
         [ button
-            [ classNames (secondaryButton <> [ "mr-small", "w-56", "text-base" ])
+            [ classNames (secondaryButton <> [ "mr-small", "w-56", "text-base", "cursor-pointer" ])
             , onClick ((const <<< Just <<< OpenModal) NewProject)
             ]
             [ text "Open existing project" ]
         , button
-            [ classNames (primaryButton <> [ "ml-small", "w-56", "text-base" ])
+            [ classNames (primaryButton <> [ "ml-small", "w-56", "text-base", "cursor-pointer" ])
             , onClick ((const <<< Just <<< OpenModal) OpenDemo)
             ]
             [ text "Open an example" ]
@@ -86,4 +86,4 @@ render state =
         ]
     ]
   where
-  newProjectClasses = [ "flex", "flex-col", "font-bold", "text-sm", "cursor-pointer" ]
+  newProjectClasses = [ "flex", "flex-col", "font-bold", "text-sm", "cursor-pointer", "text-center" ]
diff --git a/marlowe-playground-client/src/MainFrame/View.purs b/marlowe-playground-client/src/MainFrame/View.purs
@@ -41,7 +41,7 @@ render state =
                   , src marlowePlayLogo
                   ]
               , projectTitle
-              , div [ classNames [] ]
+              , div_
                   [ a [ href "./doc/marlowe/tutorials/index.html", target "_blank", classNames [ "font-semibold" ] ] [ text "Tutorial" ]
                   , a [ onClick $ const $ Just $ ChangeView ActusBlocklyEditor, classNames [ "ml-medium", "font-semibold" ] ] [ text "Actus Labs" ]
                   ]
@@ -69,7 +69,7 @@ render state =
               [ a [ href "https://cardano.org/", target "_blank", classNames [ "pr-small" ] ] [ text "cardano.org" ]
               , a [ href "https://iohk.io/", target "_blank", classNames [ "pl-small" ] ] [ text "iohk.io" ]
               ]
-          , div [] [ text (copyright <> " 2021 IOHK Ltd") ]
+          , div_ [ text (copyright <> " 2021 IOHK Ltd") ]
           , div [ classNames [ "flex" ] ]
               [ a [ href "https://t.me/IOHK_Marlowe", target "_blank", classNames [ "pr-small" ] ] [ text "Telegram" ]
               , a [ href "https://twitter.com/hashtag/Marlowe", target "_blank", classNames [ "pl-small" ] ] [ text "Twitter" ]

diff --git a/marlowe-playground-client/static/css/layout.css b/marlowe-playground-client/static/css/layout.css
@@ -30,7 +30,7 @@ header {
 main {
   display: flex;
   flex-direction: column;
-  overflow: scroll;
+  overflow: auto;
   /* Indicate which row of the .site-wrap grid to use */
   grid-area: main;