summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorunwox <me@unwox.com>2025-01-29 22:00:44 +0600
committerunwox <me@unwox.com>2025-01-29 23:18:00 +0600
commit4e4880fd6631f46138fabee5e20ddc22c84ac6bd (patch)
treec1d67535e7cf95741b3dc96280b764f9f4ec5bb6 /bin
parent5c2dfda03f0ce765b4dacd0c39cc8a0602eea917 (diff)
add suhexuan parser
Diffstat (limited to 'bin')
-rw-r--r--bin/fetch.fnl4
-rw-r--r--bin/serve.fnl4
2 files changed, 4 insertions, 4 deletions
diff --git a/bin/fetch.fnl b/bin/fetch.fnl
index 26566f7..213475e 100644
--- a/bin/fetch.fnl
+++ b/bin/fetch.fnl
@@ -9,6 +9,7 @@
(local gorkovchay (require :parser.gorkovchay))
(local moychay (require :parser.moychay))
(local ozchai (require :parser.ozchai))
+(local suhexuan (require :parser.suhexuan))
(local ipuer (require :parser.ipuer))
(local artoftea (require :parser.artoftea))
(local clubcha (require :parser.clubcha))
@@ -163,8 +164,7 @@
;; replace with with-tx
(local tx (must (luna.db.begin db)))
(must (luna.db.exec-tx tx "DELETE FROM product_tags;" []))
-(each [_ parser (pairs [ozchai clubcha ipuer artoftea chaekshop moychay
- gorkovchay])]
+(each [_ parser (pairs [suhexuan])]
(store-products tx (parser.products)))
(cache.clear-tx tx "page:")
(populate-search-table tx)
diff --git a/bin/serve.fnl b/bin/serve.fnl
index b1ec024..7385b53 100644
--- a/bin/serve.fnl
+++ b/bin/serve.fnl
@@ -491,7 +491,7 @@
[:option {:value val
:selected (if (= form.site val) "selected" nil)}
(. (require (.. "parser." val)) :title)])
- [:ozchai :clubcha :ipuer :artoftea :chaekshop :moychay
+ [:ozchai :suhexuan :clubcha :ipuer :artoftea :chaekshop :moychay
:gorkovchay]))]]
[:div {}
[:select {:name "sort"}
@@ -658,8 +658,8 @@
(must (luna.router.route "GET /" root-handler))
(must (luna.router.route "GET /robots.txt" robots-handler))
-(must (luna.router.route "GET /track" track-handler))
(must (luna.router.static "GET /static/" "static/"))
+(must (luna.router.route "GET /track" track-handler))
(when luna.debug
(must (luna.on-eval (fn [code] (fennel.eval code {:env _G})))))