fix caps parsing. Some evil person (me?\!) disallowed the dot as a character in caps

Original commit message from CVS:
fix caps parsing. Some evil person (me?\!) disallowed the dot as a character in caps

diff --git a/gst/parse/parse.l b/gst/parse/parse.l
index 95fb0c5ff84097bf749c5e1cbffaeda6563531e8..761f2ee80b02921dfeaa224b70df36400f20062d 100644 (file)
--- a/gst/parse/parse.l
+++ b/gst/parse/parse.l
@@ -42,9 +42,10 @@ _ref {_identifier}"."{_identifier}?
 _binref {_identifier}[[:space:]]*"."[[:space:]]*"("
 
 /* links */
-_capschar ("\\".)|([^[:space:]\;!\.\,\(\)\]\[])
+_mimechar ([[:alnum:]-])
+_mimetype ({_mimechar}+"/"{_mimechar}+)|("\""([^\"]|"\\\"")*"\"")|("'"([^']|"\\\"")*"'")
+_capschar ("\\".)|([^[:space:]\;!\,\(\)\]\[])
 _capsstring {_capschar}+|("\""([^\"]|"\\\"")*"\"")|("'"([^']|"\\\"")*"'")
-_mimetype ({_capschar}+"/"{_capschar}+)|("\""([^\"]|"\\\"")*"\"")|("'"([^']|"\\\"")*"'")
 _caps {_mimetype}(","[^!]|{_capsstring})*
 _link ("!"[[:space:]]*{_caps}([[:space:]]*";"[[:space:]]*{_caps})*[[:space:]]*"!")|("!")