13 lines
763 B
Plaintext
13 lines
763 B
Plaintext
<footer .footer>
|
|
<div .footer-links>
|
|
$forall (MenuItem{menuItemType, menuItemRoute = _, menuItemIcon = _, menuItemLabel, menuItemModal = _}, menuIdent, route) <- menuTypes
|
|
$case menuItemType
|
|
$of Footer
|
|
$# Not used but available (remove ` = _` from the pattern match above, as needed):
|
|
$# highlight (urlRoute menuItemRoute) :: Bool -- ^ Is this menu item currently active (i.e.: are we on this page)
|
|
$# menuItemModal :: Bool -- ^ Should this menu item open a modal instead of being a normal link
|
|
$# menuItemIcon :: Maybe Text -- ^ Should this menu item have an icon, if yes, then the name of the icon
|
|
<a href=#{route} ##{menuIdent}>
|
|
_{SomeMessage menuItemLabel}
|
|
$of _
|