change regexp for ascii escapes in log

This commit is contained in:
Rob Vermaas 2011-06-10 10:53:59 +00:00
parent 5d166150f9
commit 3824aeaab8

View file

@ -261,7 +261,7 @@ sub getLatestSuccessfulViewResult {
sub removeAsciiEscapes {
my ($logtext) = @_;
$logtext =~ s/\e\[[A-Za-z]//g;
$logtext =~ s/\e\[[0-9]*[A-Za-z]//g;
return $logtext;
}