chore: port legacy syntax to rawIdent
parent
953d9dc304
commit
2e4642e17c
|
@ -12,7 +12,7 @@ def ctorToHtml (i : NameInfo) : HtmlM Html := do
|
||||||
pure <li class="constructor" id={name}>{shortName} : [←infoFormatToHtml i.type]</li>
|
pure <li class="constructor" id={name}>{shortName} : [←infoFormatToHtml i.type]</li>
|
||||||
|
|
||||||
def inductiveToHtml (i : InductiveInfo) : HtmlM (Array Html) := do
|
def inductiveToHtml (i : InductiveInfo) : HtmlM (Array Html) := do
|
||||||
let constructorsHtml := <ul "class"="constructors">[← i.ctors.toArray.mapM ctorToHtml]</ul>
|
let constructorsHtml := <ul class="constructors">[← i.ctors.toArray.mapM ctorToHtml]</ul>
|
||||||
pure #[constructorsHtml]
|
pure #[constructorsHtml]
|
||||||
|
|
||||||
end Output
|
end Output
|
||||||
|
|
|
@ -27,7 +27,7 @@ partial def moduleListDir (h : Hierarchy) : HtmlM Html := do
|
||||||
let fileNodes ← (files.mapM moduleListFile)
|
let fileNodes ← (files.mapM moduleListFile)
|
||||||
let moduleLink ← moduleNameToLink h.getName
|
let moduleLink ← moduleNameToLink h.getName
|
||||||
pure
|
pure
|
||||||
<details "class"="nav_sect" "data-path"={moduleLink}
|
<details class="nav_sect" "data-path"={moduleLink}
|
||||||
[if (←getCurrentName).any (h.getName.isPrefixOf ·) then #[("open", "")] else #[]]>
|
[if (←getCurrentName).any (h.getName.isPrefixOf ·) then #[("open", "")] else #[]]>
|
||||||
{
|
{
|
||||||
if (←getResult).moduleInfo.contains h.getName then
|
if (←getResult).moduleInfo.contains h.getName then
|
||||||
|
@ -44,7 +44,7 @@ def moduleList : HtmlM Html := do
|
||||||
let mut list := Array.empty
|
let mut list := Array.empty
|
||||||
for (n, cs) in hierarchy.getChildren do
|
for (n, cs) in hierarchy.getChildren do
|
||||||
list := list.push $ ←moduleListDir cs
|
list := list.push $ ←moduleListDir cs
|
||||||
pure <div "class"="module_list">[list]</div>
|
pure <div class="module_list">[list]</div>
|
||||||
|
|
||||||
def navbar : HtmlM Html := do
|
def navbar : HtmlM Html := do
|
||||||
pure
|
pure
|
||||||
|
|
Loading…
Reference in New Issue