From 208fb6ddde7ad5ea28cd36cb0d11d8d860c84bde Mon Sep 17 00:00:00 2001
From: Oskari Timperi <oskari.timperi@iki.fi>
Date: Fri, 21 Sep 2012 09:44:46 +0300
Subject: fix vendor-id handling

---
 src/ical.peg | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/ical.peg b/src/ical.peg
index 771ea44..b781b8e 100644
--- a/src/ical.peg
+++ b/src/ical.peg
@@ -36,10 +36,16 @@ IANAToken
   = token:([A-Za-z0-9-]+) { return token.join(""); }
 
 XName
-  = x:"X-" vendor:(VendorID "-")? tok:[A-Za-z0-9-]+ { return x + vendor + tok.join(""); }
+  = x:"X-" vendor:(VendorID "-")? tok:[A-Za-z0-9-]+ {
+    if (vendor !== null) vendor = vendor[0] + '-';
+    else vendor = '';
+    return x + vendor + tok.join("");
+  }
 
 VendorID
-  = [A-Za-z0-9][A-Za-z0-9][A-Za-z0-9]
+  = chars:[A-Za-z0-9]+ {
+    return chars.join("");
+  }
 
 Param
   = name:ParamName "=" params:ParamValueList {
-- 
cgit v1.2.3