summaryrefslogtreecommitdiff
path: root/dicts.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'dicts.fnl')
-rw-r--r--dicts.fnl22
1 files changed, 22 insertions, 0 deletions
diff --git a/dicts.fnl b/dicts.fnl
new file mode 100644
index 0000000..d7c72b6
--- /dev/null
+++ b/dicts.fnl
@@ -0,0 +1,22 @@
+(local tea-type
+ [{:value "white" :label "Белый"}
+ {:value "dark-oolong" :label "Темный улун"}
+ {:value "light-oolong" :label "Светлый улун"}
+ {:value "red" :label "Красный"}
+ {:value "green" :label "Зеленый"}
+ {:value "shu-puerh" :label "Шу пуэр"}
+ {:value "sheng-puerh" :label "Шэн пуэр"}])
+
+(local tea-packaging
+ [{:value "loose" :label "Россыпь"}
+ {:value "piece" :label "Штучный товар"}
+ {:value "pieces" :label "Разлом"}])
+
+(fn label [dict value]
+ (var result nil)
+ (each [_ item (ipairs dict) &until result]
+ (when (= item.value value)
+ (set result item.label)))
+ result)
+
+{: tea-type : tea-packaging : label}