|
@@ -92,6 +92,9 @@ sub render_readme($$) {
|
|
} elsif ( $line =~ m/(http.*)/ ) {
|
|
} elsif ( $line =~ m/(http.*)/ ) {
|
|
$line = link_line($line);
|
|
$line = link_line($line);
|
|
print $fh "$line<br>";
|
|
print $fh "$line<br>";
|
|
|
|
+ } elsif ( $line =~ m/^~~(.*)~~/ ) {
|
|
|
|
+ $line = "<s>$1</s>";
|
|
|
|
+ print $fh "$line<br>";
|
|
}
|
|
}
|
|
else {
|
|
else {
|
|
print $fh "$line<br>";
|
|
print $fh "$line<br>";
|