From 8be1c614f1027ad599fb8a6136950f94d3de3f8b Mon Sep 17 00:00:00 2001 From: "Difrex(Denis Zheleztsov)" Date: Mon, 11 Aug 2014 12:25:49 +0400 Subject: [PATCH] Parsing fix --- II/T.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) 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;