Eventually-decentralized project hosting and management platform

Clone

HTTPS: darcs clone https://vervis.peers.community/repos/WvWbo

SSH: darcs clone USERNAME@vervis.peers.community:WvWbo

Tags

TODO

one.hamlet

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

^{deckNavW edeck actor}

<h2>#{ticketTitle ticket}

<div>
  Created on #{showDate $ ticketCreated ticket} by
  ^{personLinkFedW author}

<div>
  <span>
    <a href=@{TicketFollowersR deckHash ticketHash}>
      [🐤 Followers]
  <span>
    <a href=@{TicketDepsR deckHash ticketHash}>
      [⤴ Dependencies]
  <span>
    <a href=@{TicketReverseDepsR deckHash ticketHash}>
      [⤷ Dependants]
  <span>
      [✋ Claim requests]
  <span>
      [✏ Edit]

^{followButton}

<div>^{desc}

$# $if ticketStatus ticket /= TSClosed
$#   <p>
$#     $maybe (assignee, me) <- massignee
$#       $if me
$#         Assigned to you.
$#
$#         ^{buttonW POST "Unclaim this ticket" (ProjectTicketUnclaimR deckHash ticketHash)}
$#       $else
$#         Assigned to ^{sharerLinkW assignee}.
$#
$#         ^{buttonW POST "Unassign this ticket" (ProjectTicketUnassignR deckHash ticketHash)}
$#     $nothing
$#       Not assigned.
$#
$#       <a href=@{ClaimRequestNewR deckHash ticketHash}>Ask to have it assigned to you
$#
$#       or
$#
$#       ^{buttonW POST "Claim this ticket" (ProjectTicketClaimR deckHash ticketHash)}
$#
$#       or
$#
$#       <a href=@{ProjectTicketAssignR deckHash ticketHash}>Assign to someone else
$#       .

<p>
  Status: #
  $maybe (closed, closer) <- resolved
    Closed on #{showDate closed} by ^{personLinkFedW closer}
$#  ^{buttonW POST "Reopen this ticket" (ProjectTicketOpenR deckHash ticketHash)}
  $nothing
    Open
$#  ^{buttonW POST "Close this ticket" (ProjectTicketCloseR deckHash ticketHash)}

<h3>Custom fields

<ul>
  $forall TicketTextParam field mvalue <- tparams
    <li .#{relevant $ wfsFilter field}>
$#       <a href=@{WorkflowFieldR wshr wfl $ wfsIdent field}>
        #{wfsName field}
      :
      $maybe value <- mvalue
        #{ttpvVal value}
      $nothing
        $if wfsRequired field
          NO VALUE FOR REQUIRED FIELD
        $else
          (none)
  $forall TicketEnumParam field enum mvalue <- eparams
    <li .#{relevant $ wfsFilter field}>
$#       <a href=@{WorkflowFieldR wshr wfl $ wfsIdent field}>
      #{wfsName field}
      :
      $maybe value <- mvalue
$#         <a href=@{WorkflowEnumCtorsR wshr wfl $ wesIdent enum}>
          #{tepvName value}
      $nothing
        $if wfsRequired field
          NO VALUE FOR REQUIRED FIELD
        $else
          (none)
  $forall TicketClassParam field mvalue <- cparams
    <li .#{relevant $ wfsFilter field}>
$#       <a href=@{WorkflowFieldR wshr wfl $ wfsIdent field}>
      #{wfsName field}
      :
      $maybe _tpcid <- mvalue
        Yes
      $nothing
        No

$# <p>
$#   ^{buttonW DELETE "Delete this ticket" (ProjectTicketR deckHash ticketHash)}

<h3>Discussion

^{discuss}