Revert "Turn ansi escape sequences into html tags"

This reverts commit 44af9271e0.
This commit is contained in:
Tatsuya Kinoshita
2023-01-16 06:08:11 +09:00
parent 8891eab5b5
commit 7caad9ccf4

View File

@@ -162,16 +162,6 @@ EOF
next;
}
my $printchar='[^]';
s@\[34m\[1m($printchar+)\[0m@<u><b>$1</b></u>@g;
s@\[1m($printchar+)\[0m@<b>$1</b>@g;
s@\[4m($printchar+)\[24m@<u>$1</u>@g;
s@\[1m($printchar+)\[0m@<b>$1</b>@g;
s@\[1m($printchar+)\[22m@<b>$1</b>@g;
s@\[1m($printchar+)\[4m@<b>$1</b>@g;
s@\[22m($printchar+)\[0m@<u>$1</u>@g;
s@\[22m($printchar+)\[24m@<u>$1</u>@g;
s@\[4m($printchar+)\[0m@<u>$1</u>@g;
s@(http|ftp)://[\w.\-/~]+[\w/]@<a href="$&">$&</a>@g;
s@\b(mailto:|)(\w[\w.\-]*\@\w[\w.\-]*\.[\w.\-]*\w)@<a href="mailto:$2">$1$2</a>@g;
s@(\W)(\~?/[\w.][\w.\-/~]*)@$1 . &file_ref($2)@ge;