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
This commit is contained in:
Benjamin Otte 2003-12-14 04:28:11 +00:00
parent 90d64117c5
commit 8cf0d17c3f

View file

@ -42,9 +42,10 @@ _ref {_identifier}"."{_identifier}?
_binref {_identifier}[[:space:]]*"."[[:space:]]*"(" _binref {_identifier}[[:space:]]*"."[[:space:]]*"("
/* links */ /* links */
_capschar ("\\".)|([^[:space:]\;!\.\,\(\)\]\[]) _mimechar ([[:alnum:]-])
_mimetype ({_mimechar}+"/"{_mimechar}+)|("\""([^\"]|"\\\"")*"\"")|("'"([^']|"\\\"")*"'")
_capschar ("\\".)|([^[:space:]\;!\,\(\)\]\[])
_capsstring {_capschar}+|("\""([^\"]|"\\\"")*"\"")|("'"([^']|"\\\"")*"'") _capsstring {_capschar}+|("\""([^\"]|"\\\"")*"\"")|("'"([^']|"\\\"")*"'")
_mimetype ({_capschar}+"/"{_capschar}+)|("\""([^\"]|"\\\"")*"\"")|("'"([^']|"\\\"")*"'")
_caps {_mimetype}(","[^!]|{_capsstring})* _caps {_mimetype}(","[^!]|{_capsstring})*
_link ("!"[[:space:]]*{_caps}([[:space:]]*";"[[:space:]]*{_caps})*[[:space:]]*"!")|("!") _link ("!"[[:space:]]*{_caps}([[:space:]]*";"[[:space:]]*{_caps})*[[:space:]]*"!")|("!")