@@ -1,6 +1,7 @@
pisg (0.61) - ??
Changes by Christoph Berg:
* Fix warning when running on empty logs.
+ * Fix & conversion.
* More nick sanitizing.
* Remove whitespace around user pictures, border="0", title.
* docs/:
@@ -186,6 +186,9 @@ sub htmlentities
my $str = shift;
my $charset = shift;
+ $str =~ s/\&/\&/go;
+ $str =~ s/\</\</go;
+ $str =~ s/\>/\>/go;
if ($charset =~ /iso-8859-1/i) { # this is for people without Text::Iconv
$str =~ s/ü/ü/go;
$str =~ s/ö/ö/go;
@@ -199,10 +202,6 @@ sub htmlentities
$str =~ s/Ø/Ø/go;
$str =~ s/\x95/\•/go;
}
- $str =~ s/\&/\&/go;
- $str =~ s/\</\</go;
- $str =~ s/\>/\>/go;
-
return $str;