| Subject: | A patch to fix WikiWord support |
There's a pretty thorough explanation of what a WikiWord should be here
http://twiki.org/cgi-bin/view/TWiki/WikiWord
this patch will match that.
--- SAX.pm.orig 2003-06-11 18:52:18.000000000 -0700
+++ SAX.pm 2003-06-12 14:21:39.000000000 -0700
@@ -229,8 +229,8 @@
$self->_format_line($1, $strong, $emphasized, $line, $link, $data);
$link->($2);
}
- #CamelCase link
- elsif ($text =~ s|^(.*?)(?<!["/>=])\b([A-Za-z]+(?:[A-Z]\w+)+)||) {
+ #CamelCase link (aka WikiWord)
+ elsif ($text =~ s|^(.*?)(?<!["/>=])\b([A-Z]+\w*[a-z]+\w*[A-Z]+\w*[a-z]+\w*)||) {
$data->($1);
$link->($2);
}