Support vCard 4 LANG language-tag values

2026-03-28 20:28:00 -05:00
parent 99a36f71d0
commit 7e933dd30f
1 changed files with 10 additions and 3 deletions
--- a/src/vcard/vcard4.nim
+++ b/src/vcard/vcard4.nim
@@ -1336,6 +1336,13 @@ macro genPropParsers(
          params = params))

    of vtText:
+      if pn == pnLang:
+        parseCase[1] = genAst(contents, typeName, p):
+          let valueType = params.getSingleValue("VALUE")
+          if valueType.isSome and valueType.get != $vtLanguageTag:
+            p.error("parameter 'VALUE' must have the value '" & $vtLanguageTag & "'")
+          contents.add(ac(typeName(value: p.readTextValue)))
+      else:
        parseCase[1] = genAst(contents, typeName, pt):
          p.validateType(params, pt)
          contents.add(ac(typeName(value: p.readTextValue)))