now hiding administration from non administrators
This commit is contained in:
parent
e31200e2e7
commit
947ab624b4
1 changed files with 6 additions and 4 deletions
|
@ -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}>
|
||||||
|
|
Loading…
Reference in a new issue