From 3a1b9d39ff109d9b7c92c0283e262e625a00a39a Mon Sep 17 00:00:00 2001
From: unwox <me@unwox.com>
Date: Sun, 25 May 2025 21:20:28 +0600
Subject: add batatcha parser

---
 bin/fetch.fnl | 7 ++++---
 bin/serve.fnl | 2 +-
 2 files changed, 5 insertions(+), 4 deletions(-)

(limited to 'bin')

diff --git a/bin/fetch.fnl b/bin/fetch.fnl
index 72d4c1f..794d147 100644
--- a/bin/fetch.fnl
+++ b/bin/fetch.fnl
@@ -9,6 +9,7 @@
 (local {: must} (require :lib.utils))
 
 (local artoftea (require :parser.artoftea))
+(local batatcha (require :parser.batatcha))
 (local chaekshop (require :parser.chaekshop))
 (local clubcha (require :parser.clubcha))
 (local daochai (require :parser.daochai))
@@ -19,8 +20,8 @@
 (local ozchai (require :parser.ozchai))
 (local suhexuan (require :parser.suhexuan))
 (local tea108 (require :parser.tea108))
-(local yoceramics (require :parser.yoceramics))
 (local teaworkshop (require :parser.teaworkshop))
+(local yoceramics (require :parser.yoceramics))
 
 (when _G.unpack
  (tset table :unpack _G.unpack))
@@ -193,9 +194,9 @@
                               FROM products;" []))
   (must (luna.db.commit tx)))
 
- (each [_ parser (pairs [yoceramics daochai gorkovchay moychay ozchai suhexuan
+ (each [_ parser (pairs [batatcha yoceramics daochai gorkovchay ozchai suhexuan
                          ipuer artoftea clubcha chaekshop kolokolnikovchai
-                         tea108 teaworkshop])]
+                         tea108 teaworkshop moychay])]
   (local products (parser.products))
   (when (< 0 (# products))
     ;; replace with with-tx
diff --git a/bin/serve.fnl b/bin/serve.fnl
index 3b85110..0d742e3 100644
--- a/bin/serve.fnl
+++ b/bin/serve.fnl
@@ -468,7 +468,7 @@
               [:option {:value val
                         :selected (if (= form.site val) "selected" nil)}
                        (. (require (.. "parser." val)) :title)])
-            [:suhexuan :ozchai :kolokolnikovchai :yoceramics :tea108
+            [:suhexuan :ozchai :batatcha :kolokolnikovchai :yoceramics :tea108
              :ipuer :clubcha :daochai :chaekshop :teaworkshop :artoftea
              :moychay :gorkovchay]))]]
      [:div {}
-- 
cgit v1.2.3