sub filter (@) { #{{{
my %params=@_;
- $params{content} =~ s{(?<=\s)(\\?)$smiley_regexp(?=\s)}{
- $1 ? $2 : htmllink($params{page}, $params{page}, $smileys{$2}, 0, 0, $2)
+ $params{content} =~ s{(?:^|(?<=\s))(\\?)$smiley_regexp(?:(?=\s)|$)}{
+ $1 ? $2 : htmllink($params{page}, $params{page}, $smileys{$2}, linktext => $2)
}egs;
-
+
return $params{content};
} # }}}