fradrive/templates/widgets/user-rights-form/user-rights-form.hamlet
2020-05-19 10:21:42 +02:00

20 lines
586 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
^{fvWidget boxView}