r
/
bookshelf-doc
mirror of https://github.com/jrpotter/bookshelf-doc
1
Fork 0
Code Issues Packages Projects Releases Wiki Activity

doc: Output.Template

main
Henrik Böving 2022-05-19 21:53:03 +02:00
parent 8e4b7bdb50
commit 12fe918b2d
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
DocGen4/Output/Template.lean
View File

@ -11,7 +11,10 @@ namespace Output
open scoped DocGen4.Jsx open scoped DocGen4.Jsx
def baseHtmlArray (title : String) (site : Array Html) : HtmlM Html := do /--
The HTML template used for all pages.
-/
def baseHtmlGenerator (title : String) (site : Array Html) : HtmlM Html := do
pure pure
<html lang="en"> <html lang="en">
<head> <head>
@ -60,8 +63,10 @@ def baseHtmlArray (title : String) (site : Array Html) : HtmlM Html := do
</html> </html>
/--
def baseHtml (title : String) (site : Html) : HtmlM Html := baseHtmlArray title #[site] A comfortability wrapper around `baseHtmlGenerator`.
-/
def baseHtml (title : String) (site : Html) : HtmlM Html := baseHtmlGenerator title #[site]
end Output end Output
end DocGen4 end DocGen4