1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut-pastebin synced 2025-06-07 14:17:26 -04:00

Fix timeout issues. Should really change the protocol on this

This commit is contained in:
Ryan Voots 2018-06-26 12:33:23 -04:00
parent baac54098a
commit 53fb9bc390

View file

@ -153,6 +153,7 @@ sub get_eval_reader {
if ($type eq 'Warning') { if ($type eq 'Warning') {
push @{$warnings{$seq}}, $message->message; push @{$warnings{$seq}}, $message->message;
$futures{$seq}->done($message->message);
} elsif ($type eq 'EvalResponse') { } elsif ($type eq 'EvalResponse') {
print "Got eval response for $seq\n"; print "Got eval response for $seq\n";
my $output = $message->get_contents; my $output = $message->get_contents;