19 lines
678 B
Plaintext
19 lines
678 B
Plaintext
<aside .main__aside>
|
|
<div .asidenav>
|
|
<div .asidenav__box--dont-hide>
|
|
<ul .asidenav__list>
|
|
$forall menuType <- menuTypes
|
|
$case menuType
|
|
$of NavbarLeft (MenuItem label icon route _)
|
|
<li .asidenav__list-item :Just route == mcurrentRoute:.asidenav__list-item--active>
|
|
<a .asidenav__link :isJust icon:.glyphicon :isJust icon:.glyphicon--#{iconToText icon} href=@{route}>#{label}
|
|
$of _
|
|
|
|
<div .asidenav__box>
|
|
<h3 .asidenav__box-title>WiSe 17/18
|
|
<ul .asidenav__list.asidenav__list--padded>
|
|
<li>Vorlesung 1
|
|
<li>Vorlesung 2
|
|
<li>Vorlesung 3
|
|
<li>Vorlesung 4
|