| … | |
… | |
| 372 | ); |
372 | ); |
| 373 | |
373 | |
| 374 | my $time = sprintf "%02d:%02d:%02d", (localtime time)[2,1,0]; |
374 | my $time = sprintf "%02d:%02d:%02d", (localtime time)[2,1,0]; |
| 375 | |
375 | |
| 376 | # try to create single paragraphs of multiple lines sent by the server |
376 | # try to create single paragraphs of multiple lines sent by the server |
| 377 | $text =~ s/(?<=\S)\n(?=\S)/ /g; |
377 | $text =~ s/(?<=\S)\n(?=\w)/ /g; |
| 378 | |
378 | |
| 379 | $text = CFClient::UI::Label::escape $text; |
379 | $text = CFClient::UI::Label::escape $text; |
| 380 | $text =~ s/\[b\](.*?)\[\/b\]/<b>\1<\/b>/g; |
380 | $text =~ s/\[b\](.*?)\[\/b\]/<b>\1<\/b>/g; |
| 381 | $text =~ s/\[color=(.*?)\](.*?)\[\/color\]/<span foreground='\1'>\2<\/span>/g; |
381 | $text =~ s/\[color=(.*?)\](.*?)\[\/color\]/<span foreground='\1'>\2<\/span>/g; |
| 382 | |
382 | |
