Federated forge server

Clone

HTTPS: git clone https://vervis.peers.community/repos/rjQ3E

SSH: git clone USERNAME@vervis.peers.community:rjQ3E

Branches

• main

Tags

children.hamlet

$# This file is part of Vervis.
$#
$# Written in 2016, 2019, 2022, 2023, 2024
$# 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/>.

^{groupNavW (Entity groupID group) actor}

<h2>Children

<table>
  <tr>
    <th>Role
    <th>Since
    <th>Child
    $if haveAdmin
      <th>Remove
  $forall (role, since, child, destID) <- children
    <tr>
      <td>#{show role}
      <td>#{showDate since}
      <td>^{groupLinkFedW child}
      $if haveAdmin
        <td>^{buttonW POST "Remove" (GroupRemoveChildR groupHash destID)}

$if haveAdmin
  <p>Add a child:
  <form method=POST action=@{GroupAddChildR groupHash} enctype=#{enctypeAP}>
    ^{widgetAP}
    <input type=submit>

<h2>Invites

<table>
  <tr>
    <th>Inviter
    <th>Via
    <th>Invited child
    <th>I accepted?
    <th>Role
    <th>Time
    $if haveAdmin
      <th>Approve
  $forall (inviter, us, child, accept, time, role, destID) <- invites
    <tr>
      <td>^{actorLinkFedW inviter}
      <td>
        $if us
          Us
        $else
          Them
      <td>^{groupLinkFedW child}
      <td>
        $if accept
          [x]
        $else
          [_]
      <td>#{show role}
      <td>#{showDate time}
      $if haveAdmin && (not accept && not us)
        <td>^{buttonW POST "Approve" (GroupApproveChildR groupHash destID)}