admin :: State -> ActionM ()
admin state = do
  localhost <- isLocalhost
  if not localhost
    then raise "you are not allowed"
    else render (AdminView.render state)
admin :: State -> ActionM ()
admin state = do
  localhost <- isLocalhost
  if not localhost
    then raise "you are not allowed"
    else render (AdminView.render state)
admin state = do
  localhost <- isLocalhost
  if not localhost
    then raise "you are not allowed"
    else render (AdminView.render state)