@@ -49,8 +49,7 @@ let makeBreadcrumbs = (~basePath: string, route: string): list<Url.breadcrumb> =
4949@react.component
5050let make = (
5151 ~breadcrumbs :option <list <Url .breadcrumb >>= ?,
52- ~title :string ,
53- ~metaTitleCategory :option <string >= ?,// e.g. Introduction | My Meta Title Category
52+ ~metaTitleCategory :string ,// e.g. Introduction | My Meta Title Category
5453 ~frontmatter = ?,
5554 ~version :option <string >= ?,
5655 ~availableVersions :option <array <(string ,string )>>= ?,
@@ -86,7 +85,6 @@ let make = (
8685
8786let preludeSection =
8887 <div className = "flex flex-col justify-between text-fire font-medium items-baseline" >
89- {React .string (title )}
9088 {switch version {
9189 |Some (version )=>
9290switch availableVersions {
@@ -111,30 +109,23 @@ let make = (
111109 </div >
112110
113111let sidebar =
114- <Sidebar
115- isOpen = isSidebarOpen toggle = toggleSidebar preludeSection title ?activeToc categories route
116- />
112+ <Sidebar isOpen = isSidebarOpen toggle = toggleSidebar preludeSection ?activeToc categories route />
117113
118- let metaTitle = switch metaTitleCategory {
119- |Some (titleCategory )=> titleCategory ++ (" | " ++ "ReScript Documentation" )
120- |None => title
121- }
114+ let metaTitle = metaTitleCategory ++ (" | " ++ "ReScript Documentation" )
122115
123116let (metaElement ,editHref )= switch frontmatter {
124117 |Some (frontmatter )=>
125118switch DocFrontmatter .decode (frontmatter ) {
126119 |Some (fm )=>
127120let canonical = Null .toOption (fm .canonical )
128121let description = Null .toOption (fm .description )
129- let title = switch metaTitleCategory {
130- |Some (titleCategory )=>
122+ let title = {
131123// We will prefer an existing metaTitle over just a title
132124let metaTitle = switch Null .toOption (fm .metaTitle ) {
133125 |Some (metaTitle )=> metaTitle
134126 |None => fm .title
135127 }
136- metaTitle ++ (" | " ++ titleCategory )
137- |None => title
128+ metaTitle ++ (" | " ++ metaTitleCategory )
138129 }
139130let meta = <Meta title ?description ?canonical version = Url .parse (router .route ).version />
140131
@@ -173,8 +164,7 @@ module Make = (Content: StaticContent) => {
173164let make = (
174165// base breadcrumbs without the very last element (the currently shown document)
175166 ~breadcrumbs :option <list <Url .breadcrumb >>= ?,
176- ~title :string ,
177- ~metaTitleCategory :option <string >= ?,
167+ ~metaTitleCategory :string ,
178168 ~frontmatter = ?,
179169 ~version :option <string >= ?,
180170 ~availableVersions :option <array <(string ,string )>>= ?,
@@ -235,8 +225,7 @@ module Make = (Content: StaticContent) => {
235225
236226make ({
237227 ?breadcrumbs ,
238- title ,
239- ?metaTitleCategory ,
228+ metaTitleCategory ,
240229 ?frontmatter ,
241230 ?version ,
242231 ?availableVersions ,