diff --git a/components/HeaderNavigation.res b/components/HeaderNavigation.res index 7d49509a..cf70709a 100644 --- a/components/HeaderNavigation.res +++ b/components/HeaderNavigation.res @@ -92,7 +92,7 @@ let make = (~content) => { className={"absolute z-10 left-1/2 transform -translate-x-1/2 mt-3 px-2 w-screen max-w-xs sm:px-0 " ++ switch activeMenu { | Some(Industry) => " opacity-100 translate-y-0 " - | _ => " opacity-0 translate-y-1 " + | _ => " hidden " }}>
@@ -152,7 +152,7 @@ let make = (~content) => { className={"absolute z-10 left-1/2 transform -translate-x-1/2 mt-3 px-2 w-screen max-w-xs sm:px-0 " ++ switch activeMenu { | Some(Resources) => " opacity-100 translate-y-0 " - | _ => " opacity-0 translate-y-1 " + | _ => " hidden " }}>
@@ -221,7 +221,7 @@ let make = (~content) => { className={"absolute z-10 left-1/2 transform -translate-x-1/2 mt-3 px-2 w-screen max-w-xs sm:px-0 " ++ switch activeMenu { | Some(Community) => " opacity-100 translate-y-0 " - | _ => " opacity-0 translate-y-1 " + | _ => " hidden translate-y-1 " }}>
diff --git a/res_pages/industry/IndustryUsers.res b/res_pages/industry/IndustryUsers.res index 800dfe43..279c2e3e 100644 --- a/res_pages/industry/IndustryUsers.res +++ b/res_pages/industry/IndustryUsers.res @@ -1,3 +1,5 @@ +module Link = Next.Link + let s = React.string type t = { @@ -10,13 +12,62 @@ let contentEn = { pageDescription: `OCaml is a popular choice for companies who make use of its features in key aspects of their technologies. Some companies that use OCaml code are listed below:`, } +type callToAction = { + label: string, + url: string, +} + +// TODO: as part of generalizing, consolidate this with installocaml version +module MarkdownPageTitleHeading2 = { + @react.component + let make = (~title, ~pageDescription, ~descriptionCentered=false, ~callToAction=?) => +
+

+ // TODO: pass in mt-2 as a paramater + + {s(title)} + +

+

" text-center " + | false => "" + }}> + {s(pageDescription)} +

+ {switch callToAction { + | Some(callToAction) => +
+ + + {s(callToAction.label)} + + +
+ | None => <> + }} +
+} + @react.component let make = (~content=contentEn) => <> - +
+
+ +
+
let default = make diff --git a/res_pages/resources/ResourcesInstallOcaml.res b/res_pages/resources/ResourcesInstallOcaml.res index cadcab8e..8becdbca 100644 --- a/res_pages/resources/ResourcesInstallOcaml.res +++ b/res_pages/resources/ResourcesInstallOcaml.res @@ -48,6 +48,7 @@ let make = (~source, ~title, ~pageDescription) => { />
+ // TODO: remove redundant bg-graylight