From 57bed786370154fddca335a3552166e089ef1fd2 Mon Sep 17 00:00:00 2001
From: unwox <me@unwox.com>
Date: Thu, 17 Oct 2024 16:41:13 +0600
Subject: fix clubcha parsing

---
 parser/clubcha.fnl | 46 ++++++++++++++++++++++++++++------------------
 1 file changed, 28 insertions(+), 18 deletions(-)

(limited to 'parser')

diff --git a/parser/clubcha.fnl b/parser/clubcha.fnl
index 4bfe8ec..a32f767 100644
--- a/parser/clubcha.fnl
+++ b/parser/clubcha.fnl
@@ -31,24 +31,34 @@
    (parser.anywhere
      (parser.tag :span {:class "js-prod-price"}
       (peg.Cg (^ (+ parser.pegs.number parser.pegs.spaces) 1) :price)))
-   (parser.maybe
-    (parser.anywhere
-      (parser.tag
-        :option
-        {:data-price "*"
-        :data-stock "*"
-        :data-units "*"
-        :data-oldprice "*"
-        :value "*"}
-        (peg.Cg (parser.till "</option>") :weight))))
-   (parser.anywhere
-    (parser.tag
-      :button
-      {:type "submit"
-       :value "Купить"
-       :data-added-text "В корзине"
-       :class "*"}
-      (parser.anywhere "Купить")))))
+   (+
+     (*
+      (parser.anywhere
+        (parser.tag
+          :option
+          {:selected ""
+           :data-price "*"
+           :data-stock "*"
+           :data-units "*"
+           :data-oldprice "*"
+           :value "*"}
+           (peg.Cg (parser.till "</option>") :weight)))
+      (parser.anywhere
+       (parser.tag
+         :button
+         {:type "submit"
+          :value "Купить"
+          :data-added-text "В корзине"
+          :class "*"}
+         (parser.anywhere "Купить"))))
+     (parser.anywhere
+       (parser.tag
+         :button
+         {:type "submit"
+          :value "Купить"
+          :data-added-text "В корзине"
+          :class "*"}
+         (parser.anywhere "Купить"))))))
 
 (fn normalize [product]
   (local weight (parser.guess-weight product.weight))
-- 
cgit v1.2.3