add fallback when content is null

Author: aspeddro

src/bindings/DocSearch.res

@@ -11,13 +11,13 @@ type contentType = [
 ]
 
 type hierarchy = {
-  lvl0: string,
-  lvl1: string,
-  lvl2: Js.Nullable.t<string>,
-  lvl3: Js.Nullable.t<string>,
-  lvl4: Js.Nullable.t<string>,
-  lvl5: Js.Nullable.t<string>,
-  lvl6: Js.Nullable.t<string>,
+  "lvl0": string,
+  "lvl1": string,
+  "lvl2": Js.Nullable.t<string>,
+  "lvl3": Js.Nullable.t<string>,
+  "lvl4": Js.Nullable.t<string>,
+  "lvl5": Js.Nullable.t<string>,
+  "lvl6": Js.Nullable.t<string>,
 }
 
 type docSearchHit = {

src/components/Search.res

@@ -91,7 +91,14 @@ let make = () => {
                   }
                 }
 
-                {...item, url}
+                let (content, type_) = switch item.content->Js.Nullable.toOption {
+                | Some(c) => (c->Js.Nullable.return, item.type_)
+                | None =>
+                  let fallback = item.hierarchy["lvl0"]
+                  (fallback->Js.Nullable.return, #content)
+                }
+
+                {...item, url, content, type_}
               })
             }}
           />,