18 lines
536 B
Plaintext
18 lines
536 B
Plaintext
<div .asidenav>
|
|
<div .asidenav__box>
|
|
<ul .asidenav__list>
|
|
$forall menuType <- menuTypes
|
|
$case menuType
|
|
$of NavbarLeft (MenuItem label route _)
|
|
<li .asidenav__list-item :Just route == mcurrentRoute:.asidenav__list-item--active>
|
|
<a .asidenav__link href=@{route}>#{label}
|
|
$of _
|
|
|
|
<div .asidenav__box>
|
|
<h3 .asidenav__box-title>WiSe 17/18
|
|
<ul .asidenav__list>
|
|
<li>CD
|
|
<li>IxD
|
|
<li>Funktionale Programmierung
|
|
<li>Programmierung und Modellierung
|