blob: 9bf48f17a538fa2d4ce533c6188822eaa4b2ab6d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
<ul>
$forall WithType (Entity itemId Item{..}) itemType <- stock
<li .color>
<div .kindType>
<span .kind>#{itemKind}
<span .type>#{itemType}
<ul .info>
$case itemBought
$of DateKnown d
<li>
<div>
<div>Bought
<div>#{dayFormat d}
$of _
$case itemExpires
$of DateKnown d
<li>
<div>
<div>Expires
<div :d < today:.expired :d < addDays 7 today:.expireWeek :d < addGregorianMonthsRollOver 1 today:.expireMonth>
#{dayFormat d}
$of _
$case itemOpened
$of DateKnown d
<li>
<div>
<div>Opened
<div>#{dayFormat d}
$of DateUnknown
<li .content>Open
$of _
$if itemRunningLow
<li .content>Running low
|
