From 3fecc1ad61c830feeb70e522e84e838502416b5e Mon Sep 17 00:00:00 2001 From: Marius Gavrilescu Date: Sat, 2 May 2015 23:07:26 +0300 Subject: [PATCH] Fix $httpd_port not having any effect --- lib/App/FonBot/Plugin/Config.pm | 1 + lib/App/FonBot/Plugin/HTTPD.pm | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/App/FonBot/Plugin/Config.pm b/lib/App/FonBot/Plugin/Config.pm index 8bcb682..0980896 100644 --- a/lib/App/FonBot/Plugin/Config.pm +++ b/lib/App/FonBot/Plugin/Config.pm @@ -18,6 +18,7 @@ our @EXPORT_OK=qw/$oftc_enabled $oftc_nick @oftc_channels $oftc_nickserv_passwor our ($oftc_enabled, $oftc_nick, @oftc_channels, $oftc_nickserv_password); our ($bitlbee_enabled, $bitlbee_nick, $bitlbee_server, $bitlbee_port, $bitlbee_password); our ($dir, $user, $group, @supplementary_groups); +our ($httpd_port); our ($email_batch_seconds, $email_from, $email_subject); ################################################## diff --git a/lib/App/FonBot/Plugin/HTTPD.pm b/lib/App/FonBot/Plugin/HTTPD.pm index 933a56c..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 }}, -- 2.39.2