/-
Copyright (c) 2021 Henrik Böving. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Authors: Henrik Böving
-/
import DocGen4.Output.ToHtmlFormat
import DocGen4.Output.Navbar
namespace DocGen4
namespace Output
open scoped DocGen4.Jsx
def baseHtmlArray (title : String) (site : Array Html) : HtmlM Html := do
pure
{title}
Documentation
{title}
-- TODO: Replace this form with our own search
[site]
{←navbar}
def baseHtml (title : String) (site : Html) : HtmlM Html := baseHtmlArray title #[site]
end Output
end DocGen4