From 38e42723a916b7d5c2a15e514b3f3e6dcab398dd Mon Sep 17 00:00:00 2001 From: Joris Date: Sat, 8 Aug 2020 21:04:28 +0200 Subject: Propose already defined colors in the form --- src/View/Layout.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/View/Layout.ml') diff --git a/src/View/Layout.ml b/src/View/Layout.ml index b217f0b..db1e234 100644 --- a/src/View/Layout.ml +++ b/src/View/Layout.ml @@ -1,9 +1,9 @@ let section attrs content = H.div - (Js.Array.concat [| HA.class_ "g-Layout__Section" |] attrs) + (HA.concat attrs [| HA.class_ "g-Layout__Section" |]) content let line attrs content = H.div - (Js.Array.concat [| HA.class_ "g-Layout__Line" |] attrs) + (HA.concat attrs [| HA.class_ "g-Layout__Line" |]) content -- cgit v1.2.3