X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FApp%2FFonBot%2FPlugin%2FHTTPD.pm;h=ac7e0e773d0653a6f61ee7088be56bff8e3a74cd;hb=3fecc1ad61c830feeb70e522e84e838502416b5e;hp=785a0e757501b0e390469b13e1710da099508a33;hpb=4e1612f394dc932cb4ab60eb95f48fd15c27ba00;p=app-fonbot-daemon.git diff --git a/lib/App/FonBot/Plugin/HTTPD.pm b/lib/App/FonBot/Plugin/HTTPD.pm index 785a0e7..ac7e0e7 100644 --- a/lib/App/FonBot/Plugin/HTTPD.pm +++ b/lib/App/FonBot/Plugin/HTTPD.pm @@ -33,7 +33,7 @@ sub init{ %waiting_requests = (); %waiting_userrequests = (); $httpd = POE::Component::Server::HTTP->new( - Port => 8888, + Port => $httpd_port, PreHandler => { '/' => [\&pre_auth, \&pre_get, \&pre_userget], }, ContentHandler =>{ '/send' => \&on_send, '/get' => \&on_get, '/ok' => \&on_ok, '/userget' => \&on_userget, '/usersend' => \&on_usersend }, ErrorHandler => { '/' => sub { RC_OK }}, @@ -196,7 +196,7 @@ sub on_send{ if ($driver eq 'HTTP') { $responses{$user}//=[]; - push $responses{$user}, $content; + push @{$responses{$user}}, $content; if (exists $waiting_userrequests{$user}) { $waiting_userrequests{$user}->continue; delete $waiting_userrequests{$user}