20 lines
585 B
Plaintext
20 lines
585 B
Plaintext
$newline never
|
|
#{csrf}
|
|
<div .scrolltable>
|
|
<table .table .table--striped .table--hover>
|
|
<tr .table__row .table__row--head>
|
|
<th>
|
|
$# empty cell
|
|
$forall function <- allFunctions
|
|
<th .table__th>
|
|
_{function}
|
|
$forall school <- schools
|
|
$with Entity sid School{schoolName} <- school
|
|
<tr .table__row>
|
|
<th .table__th>
|
|
#{schoolName}
|
|
$forall function <- allFunctions
|
|
<td .table__td>
|
|
$maybe (_, boxView) <- Map.lookup (function, sid) boxRights
|
|
^{fvInput boxView}
|