aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Phillips <david@sighup.nz>2017-03-07 15:33:30 +1300
committerDavid Phillips <david@sighup.nz>2017-03-07 15:33:30 +1300
commite99c752927ba2e151ec887ea2e82e80d54ccea8c (patch)
tree7637f426eb24a3d0ea8db464e02996c422596721
parent9dfe91a70781292bee0ecadf1ac5e13b495309eb (diff)
downloadidalius-e99c752927ba2e151ec887ea2e82e80d54ccea8c.tar.xz
Add configuration option for port
-rwxr-xr-xsaxrobot1
-rw-r--r--sb_config.pm2
2 files changed, 2 insertions, 1 deletions
diff --git a/saxrobot b/saxrobot
index 869d976..a90eb3c 100755
--- a/saxrobot
+++ b/saxrobot
@@ -14,6 +14,7 @@ my %config = sb_config::parse_config('bot.conf');
my $irc = POE::Component::IRC->spawn(
nick => $config{nick},
ircname => $config{ircname},
+ port => $config{port},
server => $config{server},
username => $config{username},
) or die "Failed to create new PoCo-IRC: $!";
diff --git a/sb_config.pm b/sb_config.pm
index 53ce0e6..d107147 100644
--- a/sb_config.pm
+++ b/sb_config.pm
@@ -8,7 +8,7 @@ use Config::Tiny;
sub parse_config
{
- my @scalar_configs = ('nick', 'username', 'ircname', 'server', 'password', 'must_id');
+ my @scalar_configs = ('nick', 'username', 'ircname', 'server', 'port', 'password', 'must_id');
my @list_configs = ('channels', 'ignore', 'admins');
my $file = $_[0];
my %built_config;