From 477dd002b008db50361d9a87a12c6731cccb6b78 Mon Sep 17 00:00:00 2001 From: unwox Date: Tue, 22 Oct 2024 10:54:33 +0600 Subject: improve categories a bit --- parser/parser.fnl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'parser/parser.fnl') diff --git a/parser/parser.fnl b/parser/parser.fnl index acc8a19..bf8feed 100644 --- a/parser/parser.fnl +++ b/parser/parser.fnl @@ -105,7 +105,6 @@ (: (peg.Ct (^ (peg.Ct tag) 1)) :match html)) -;; FIXME: make guessing case insensitive (fn guess-tags [text] (local text (if text (must (luna.utf8.lower text)) "")) @@ -127,6 +126,8 @@ ["Шен пуэр"] (: (anywhere (+ (peg.P "матча") "маття")) :match text) ["Матча"] + (: (anywhere (peg.P "габа")) :match text) + ["Габа"] [])) (fn guess-year [text] -- cgit v1.2.3