2016-02-18 01:43:23 +09:00
|
|
|
$# This file is part of Vervis.
|
|
|
|
$#
|
2019-01-19 10:41:57 +09:00
|
|
|
$# Written in 2016, 2019 by fr33domlover <fr33domlover@riseup.net>.
|
2016-02-18 01:43:23 +09:00
|
|
|
$#
|
|
|
|
$# ♡ 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/>.
|
|
|
|
|
2019-05-23 06:50:30 +09:00
|
|
|
$maybe (Entity _pid person, verified, sharer, unread) <- mperson
|
2016-05-02 23:16:51 +09:00
|
|
|
<div>
|
2019-01-22 07:51:19 +09:00
|
|
|
$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.
|
2019-05-23 06:50:30 +09:00
|
|
|
$if unread > 0
|
|
|
|
<a href=@{NotificationsR $ sharerIdent sharer}>
|
|
|
|
🔔${unread}
|
2016-02-18 01:43:23 +09:00
|
|
|
$nothing
|
2016-05-02 23:16:51 +09:00
|
|
|
<div>
|
2016-02-18 01:43:23 +09:00
|
|
|
You are not logged in.
|
|
|
|
<a href=@{AuthR LoginR}>Log in.
|
2019-01-19 10:41:57 +09:00
|
|
|
Or
|
|
|
|
<a href=@{AuthR newAccountR}>Sign up.
|
2016-02-18 01:43:23 +09:00
|
|
|
|
2019-01-19 10:44:21 +09:00
|
|
|
<p>
|
2019-05-05 20:36:10 +09:00
|
|
|
Federation status: See <a href="#{federationPage}">here</a>!
|
2019-01-19 10:44:21 +09:00
|
|
|
|
2019-05-06 07:00:26 +09:00
|
|
|
$if federationDisabled
|
|
|
|
<p>
|
|
|
|
<span>
|
|
|
|
NOTE: Federation is disabled on this instance!
|
|
|
|
$if null federatedServers
|
|
|
|
<span>
|
|
|
|
You can test federation between other instances.
|
|
|
|
$else
|
|
|
|
<span>
|
|
|
|
You can test federation between the following instances:
|
|
|
|
<ul>
|
|
|
|
$forall h <- federatedServers
|
|
|
|
<li>
|
|
|
|
<code>
|
|
|
|
#{h}
|
|
|
|
|
2019-03-04 18:06:23 +09:00
|
|
|
<.instance>
|
|
|
|
Vervis @ #{instanceHost}
|
|
|
|
|
2016-05-06 19:29:02 +09:00
|
|
|
^{breadcrumbsW}
|
2016-05-02 23:16:51 +09:00
|
|
|
|
2016-02-13 12:35:30 +09:00
|
|
|
$maybe msg <- mmsg
|
|
|
|
<div #message>#{msg}
|
2016-05-02 23:16:51 +09:00
|
|
|
|
2016-02-13 12:35:30 +09:00
|
|
|
^{widget}
|
2016-05-18 17:35:13 +09:00
|
|
|
|
|
|
|
<footer>
|
|
|
|
^{revisionW}
|