From d28c483bdba02cf4163e99efcb07f2ee525ddda1 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Tue, 28 Mar 2017 14:56:52 +0200
Subject: Implement list view

---
 templates/inventoryList.cassius | 51 +++++++++++++++++++++++++++++++++++++++++
 templates/inventoryList.hamlet  | 33 ++++++++++++++++++++++++++
 2 files changed, 84 insertions(+)
 create mode 100644 templates/inventoryList.cassius
 create mode 100644 templates/inventoryList.hamlet

(limited to 'templates')

diff --git a/templates/inventoryList.cassius b/templates/inventoryList.cassius
new file mode 100644
index 0000000..edb9feb
--- /dev/null
+++ b/templates/inventoryList.cassius
@@ -0,0 +1,51 @@
+body > ul
+  list-style-type: none
+  margin: 0
+  padding: 0
+  li
+    padding: 0.25em
+    margin: 0
+    .kindType
+      color: inherit
+      .type
+        color: #aaa
+      .type::before
+        content: "("
+      .type::after
+        content: ")"
+    .info
+      list-style-type: none
+      margin: 0
+      padding: 0
+      li
+        display:inline-table
+        border-collapse: collapse
+        div
+          display: table-row
+          div
+            display: table-cell
+            background-color: #ddd
+            border-right:1px solid #999
+            padding: 0.25em
+          div:first-child
+            border-radius: 0.5em 0 0 0.25em
+          div:last-child
+            border-right-style: none
+            border-radius: 0 0.25em 0.5em 0
+      li.content
+        display:inline-block
+        background-color: #ddd
+        padding: 0.25em
+        border-radius: 0.5em 0.25em
+  li
+    margin-bottom:0.5em
+  li:last-child
+    margin-bottom:0
+
+.expireMonth
+  color: #995e00
+.expireWeek
+  color: #994000
+.expired
+  color: #990000
+  text-decoration: line-through
diff --git a/templates/inventoryList.hamlet b/templates/inventoryList.hamlet
new file mode 100644
index 0000000..9bf48f1
--- /dev/null
+++ b/templates/inventoryList.hamlet
@@ -0,0 +1,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
-- 
cgit v1.2.3