$# This file is part of Vervis.
$#
$# Written in 2016, 2019 by fr33domlover <fr33domlover@riseup.net>.
$#
$# ♡ Copying is an act of love. Please copy, reuse and share.
$#
$# The author(s) have dedicated all copyright and related and neighboring
$# rights to this software to the public domain worldwide. This software is
$# distributed without any warranty.
$#
$# You should have received a copy of the CC0 Public Domain Dedication along
$# with this software. If not, see
$# <http://creativecommons.org/publicdomain/zero/1.0/>.

$maybe (Entity _pid person, verified) <- mperson
  <div>
    $if verified
      You are logged in as #{personLogin person}.
      <a href=@{AuthR LogoutR}>Log out.
    $else
      You are logged in as #{personLogin person} (unverified). If you haven't
      received a verification link by email, you can ask to
      <a href=@{ResendVerifyEmailR}>resend
      it. Or <a href=@{AuthR LogoutR}>Log out.
$nothing
  <div>
    You are not logged in.
    <a href=@{AuthR LoginR}>Log in.
    Or
    <a href=@{AuthR newAccountR}>Sign up.

<p>
  UPDATE: Federation is coming!
  <a href=@{OutboxR}>Very early testing

<.instance>
  Vervis @ #{instanceHost}

^{breadcrumbsW}

$maybe msg <- mmsg
  <div #message>#{msg}

^{widget}

<footer>
  ^{revisionW}