What was really going on is that expanding a smiley modified the string and
reset the match process. Force set pos so it continues on from the expanded
smiley.
substr($_, $spos, length($smiley))=
htmllink($params{page}, $params{destpage},
$smileys{$smiley}, linktext => $smiley);
substr($_, $spos, length($smiley))=
htmllink($params{page}, $params{destpage},
$smileys{$smiley}, linktext => $smiley);
}
# Breaks out at end, otherwise it will scan through again,
# replacing de-escaped ones.
}
# Breaks out at end, otherwise it will scan through again,
# replacing de-escaped ones.
- last unless defined pos;
+ #last unless defined pos;