fradrive/templates/workflows/workflow.hamlet

63 lines
1.9 KiB
Plaintext

$newline never
$maybe WorkflowCurrentState{..} <- workflowState
<section>
<h2>
_{MsgWorkflowWorkflowWorkflowStateHeading}
<div .workflow-state>
<dl .deflist>
<dt .deflist__dt>
_{MsgWorkflowWorkflowWorkflowStateStateLabel}
<dd .deflist__dd>
$maybe (stLbl, stFin) <- wcsState
#{stLbl}
$maybe icn <- stFin
&nbsp;#{icon icn}
$nothing
<span .workflow-state--state-special>
_{MsgWorkflowWorkflowWorkflowStateStateHidden}
$forall msg <- wcsMessages
^{notification NotificationBroad msg}
$if not (onull wcsPayload)
<div .workflow-payload>
<div .workflow-payload--label>
_{MsgWorkflowWorkflowWorkflowPayloadHeading}
<dl .deflist>
$forall (payloadLbl, (newPayload, mFileRoute)) <- wcsPayload
<dt .deflist__dt>
#{payloadLbl}
<dd .deflist__dd>
$if is _Nothing mFileRoute && null newPayload
$else
<ul .list--iconless>
$maybe fileRoute <- mFileRoute
<li>
<a href=#{fileRoute}>
_{MsgWorkflowPayloadFiles}
$forall pItem <- newPayload
<li>
^{payloadToWidget pItem}
$maybe edgeView <- mEdgeView
<section>
<h2>
_{MsgWorkflowWorkflowWorkflowEdgeFormHeading}
^{edgeView}
<section>
<h2>
_{MsgWorkflowWorkflowWorkflowHistoryHeading}
<div .workflow-history-labels .explanation>
<div .workflow-history-labels__others>
_{MsgWorkflowWorkflowWorkflowHistoryLabelOthers}
<div .workflow-history-labels__own>
_{MsgWorkflowWorkflowWorkflowHistoryLabelOwn}
<ul .workflow-history>
$forall histItem <- workflowHistory
^{historyToWidget histItem}