now hiding administration from non administrators

This commit is contained in:
nek0 2016-08-27 13:59:03 +02:00
parent e31200e2e7
commit 947ab624b4

View file

@ -24,10 +24,12 @@
<li> <li>
<a href=@{LogoutR}> <a href=@{LogoutR}>
Logout Logout
$maybe _ <- madmin $case madmin
<li> $of Just admin
<a href=@{AdminR} .red> $if admin
Administration <li>
<a href=@{AdminR} .red>
Administration
$nothing $nothing
<li> <li>
<a href=@{LoginR}> <a href=@{LoginR}>