summaryrefslogtreecommitdiff
path: root/parser/parser.fnl
diff options
context:
space:
mode:
Diffstat (limited to 'parser/parser.fnl')
-rw-r--r--parser/parser.fnl3
1 files changed, 2 insertions, 1 deletions
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]