vervis/templates/ticket/one.hamlet

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

<p>
  <a href=@{TicketEditR shar proj num}>Edit this ticket
<p>
  <form method=POST action=@{TicketR shar proj num}>
    <input type=hidden name=_method value=DELETE>
    <input type=submit value="Delete this ticket">

<p>
  Depended by:

<ul>
  $if null rdeps
    <li>(none)
  $else
    $forall Entity _ t <- rdeps
      <li>
        ^{ticketDepW shar proj t}

<p>
  Depends on:

<ul>
  $if null deps
    <li>(none)
  $else
    $forall Entity _ t <- deps
      <li>
        ^{ticketDepW shar proj t}

<p>
  Created on #{showDate $ ticketCreated ticket} by
  ^{personLinkW author}

$if not $ ticketDone ticket
  <p>
    $maybe (assignee, me) <- massignee
      $if me
        Assigned to you.

        <form method=POST action=@{TicketUnclaimR shar proj num}>
          <input type=submit value="Unclaim this ticket">
      $else
        Assigned to ^{personLinkW assignee}.

        <form method=POST action=@{TicketUnassignR shar proj num}>
          <input type=submit value="Unassign this ticket">
    $nothing
      Not assigned.

      <a href=@{ClaimRequestNewR shar proj num}>Ask to have it assigned to you

      or

      <form method=POST action=@{TicketClaimR shar proj num}>
        <input type=submit value="Claim this ticket">

      or

      <a href=@{TicketAssignR shar proj num}>Assign to someone else
      .

<p>
  <a href=@{ClaimRequestsTicketR shar proj num}>Claim requests

<p>
  <a href=@{TicketDepsR shar proj num}>Dependencies

<p>
  <a href=@{TicketReverseDepsR shar proj num}>Dependants

<p>
  Status: #
  $if ticketDone ticket
    Closed on #{showDate $ ticketClosed ticket} by
    ^{personLinkW closer}.

    <form method=POST action=@{TicketOpenR shar proj num}>
      <input type=submit value="Reopen this ticket">
  $else
    Open.

    <form method=POST action=@{TicketCloseR shar proj num}>
      <input type=submit value="Close this ticket">

<h2>#{ticketTitle ticket}

^{desc}

<h3>Custom fields

<ul>
  $forall (Value fld, Value name, Value req, Value mvalue) <- tparams
    <li>
      <a href=@{WorkflowFieldR wshr wfl fld}>
        #{name}
      :
      $maybe value <- mvalue
        #{value}
      $nothing
        $if req
          NO VALUE FOR REQUIRED FIELD
        $else
          (none)
  $forall (Value fld, Value name, Value req, Value me, Value mc) <- eparams
    <li>
      <a href=@{WorkflowFieldR wshr wfl fld}>
        #{name}
      :
      $case (me, mc)
        $of (Just e, Just c)
          <a href=@{WorkflowEnumCtorsR wshr wfl e}>
            #{c}
        $of (Nothing, Nothing)
          $if req
            NO VALUE FOR REQUIRED FIELD
          $else
            (none)
        $of _
          #{error' "Impossible!"}

<h3>Discussion

^{discuss}