diff --git a/II/T.pm b/II/T.pm index bbb0e92..328ea1d 100644 --- a/II/T.pm +++ b/II/T.pm @@ -209,10 +209,10 @@ sub pre { $pre = 0; } $txt .= $line; - $txt =~ s/
//g; - # $txt =~ s/
  • //g; - # $txt =~ s/<\/li>//g; - # $txt =~ s/(>.+)<\/font>/$1/g; + $txt =~ s/
    //g if $pre == 1; + $txt =~ s/
  • //g if $pre == 1; + $txt =~ s/<\/li>//g if $pre == 1; + $txt =~ s/(>.+)<\/font>/$1/g if $pre == 1; } close $fh;