Foundation.Sidebar
type t = [
|
`active_link of Link.t
`divider
`link of Link.t
`text of string
`html of Cow.Html.t
]
val t : title:string -> content:t list -> Cow.Xml.t