diff --git a/app.cfg b/app.cfg index 5a43341..2dc0295 100644 --- a/app.cfg +++ b/app.cfg @@ -36,7 +36,7 @@ weight="2.5" # weight="1.0" [announce] -host="192.168.196.2" +host="192.168.32.1" port="1784" protocol="perlbot" diff --git a/hypnotoad.pid b/hypnotoad.pid index acbdfad..1a7fadd 100644 --- a/hypnotoad.pid +++ b/hypnotoad.pid @@ -1 +1 @@ -951231 +872665 diff --git a/lib/App/Model/Eval.pm b/lib/App/Model/Eval.pm index 007297d..fbaa5ac 100644 --- a/lib/App/Model/Eval.pm +++ b/lib/App/Model/Eval.pm @@ -59,10 +59,14 @@ sub get_eval { } else { # connect to server my %futures; + + $memd->set($paste_id, {status => 'running', output => {}}); my $server = $self->eval_connect(sub { my ($loop, $err, $stream) = @_; + print "Error? $err?\n"; + my $reader = $self->get_eval_reader($stream); my %output; diff --git a/lib/App/Model/Perlbot.pm b/lib/App/Model/Perlbot.pm index 141d99d..f6fcdad 100644 --- a/lib/App/Model/Perlbot.pm +++ b/lib/App/Model/Perlbot.pm @@ -13,6 +13,8 @@ sub announce { my $self = shift; my ($channel, $who, $what, $link) = @_; + return if (length($who) > 16); + printf "Sending to %s:%s = %s\n", $self->config->{host}, $self->config->{port}, "$channel\x1E$link\x1E$who\x1E$what\n"; my $socket = IO::Socket::INET->new( PeerAddr => $self->config->{host}, PeerPort => $self->config->{port} ) or die "error: cannot connect to announce server: $! ".$self->config->{host} . ":" .$self->config->{port}; diff --git a/static/editor.css b/static/editor.css index 844e79f..5cce674 100644 --- a/static/editor.css +++ b/static/editor.css @@ -27,3 +27,8 @@ html, body, #content { .options label:not(:first-child) { padding-left: 2em; } + +pre { + color: #000; + background-color: #FFF; +} diff --git a/templates/page.html.tt b/templates/page.html.tt index f1cf967..225f9bf 100755 --- a/templates/page.html.tt +++ b/templates/page.html.tt @@ -14,6 +14,7 @@ + Perlbot Pastebin [% PROCESS body_style %] @@ -22,6 +23,7 @@ [% PROCESS body %] + diff --git a/templates/viewer.html b/templates/viewer.html index f2906a0..1248631 100755 --- a/templates/viewer.html +++ b/templates/viewer.html @@ -27,6 +27,11 @@ font-family: "AnonymousPro"; src: url("/static/fonts/AnonymousPro-Regular.woff2") format('woff2'); } + + pre { + color: #000; + background-color: #FFF; + } [% END %]