GitHub
/
pbot
mirror of https://github.com/pragma-/pbot.git
3
0
Fork 0
Code Issues Projects Releases Wiki Activity

Replace  with "*BEEP*"; fall-back to codepad if sprunge doesn't paste

This commit is contained in:
Pragmatic Software 2016-06-28 12:04:54 -07:00
parent 35ef8a7af6
commit 4e0cf750f0
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
modules/compiler_vm/languages/_default.pm
View File

@ -149,6 +149,8 @@ sub postprocess_output {
substr($boutput, $active_position++, 1) = $c;
}
$self->{output} = $boutput;
$self->{output} =~ s/\007/*BEEP*/g;
}
sub show_output {
@ -209,6 +211,10 @@ sub show_output {
my $uri = $self->paste_sprunge($pretty_code);
if (not $uri =~ m/^http/) {
$uri = $self->paste_codepad($pretty_code);
}
print "$self->{nick}: $uri\n";
exit 0;
}
@ -532,7 +538,7 @@ sub process_interactive_edit {
last;
}
if($subcode =~ m/^\s*(?:and\s+)?(run|paste)\b/i) {
if($subcode =~ m/^\s*(?:and\s+)?(again|run|paste)\b/i) {
$self->{got_run} = lc $1;
$self->{only_show} = 0;
if ($prevchange) {