convert > and < to > and < for owncast
This commit is contained in:
parent
c1a303e19f
commit
3356d6d181
1 changed files with 4 additions and 1 deletions
5
myapp.pl
5
myapp.pl
|
@ -19,7 +19,7 @@ use Mojo::JSON qw(decode_json);
|
|||
use Mojo::UserAgent;
|
||||
use Mojo::IRC;
|
||||
use Carp qw(croak);
|
||||
use Smart::Comments;
|
||||
#use Smart::Comments;
|
||||
use MIME::Base64 qw(encode_base64);
|
||||
## no critic (prototype)
|
||||
|
||||
|
@ -117,6 +117,9 @@ $irc->on(irc_privmsg => sub ($self, $message) {
|
|||
$message->{params}[1] =~ s|\x03\d?\d||g; # colors
|
||||
$message->{params}[1] =~ s|\x03||g; # bare color code ????
|
||||
|
||||
$message->{params}[1] =~ s|>|>|g;
|
||||
$message->{params}[1] =~ s|<|<|g;
|
||||
|
||||
send_chat_to_owncast($message->{params}[1], $name[0]);
|
||||
}
|
||||
});
|
||||
|
|
Loading…
Reference in a new issue