now hiding administration from non administrators

2016-08-27 13:59:03 +02:00 · 2016-08-27 13:59:03 +02:00 · 947ab624b4
commit 947ab624b4
parent e31200e2e7
1 changed files with 6 additions and 4 deletions
--- a/templates/default-layout.hamlet
+++ b/templates/default-layout.hamlet
@ -24,10 +24,12 @@
              <li>
                <a href=@{LogoutR}>
                  Logout
-              $maybe _ <- madmin
-                <li>
-                  <a href=@{AdminR} .red>
-                    Administration
+              $case madmin
+                $of Just admin
+                  $if admin
+                    <li>
+                      <a href=@{AdminR} .red>
+                        Administration
        $nothing
          <li>
            <a href=@{LoginR}>