diff options
author | David Phillips <david@sighup.nz> | 2017-03-07 15:33:30 +1300 |
---|---|---|
committer | David Phillips <david@sighup.nz> | 2017-03-07 15:33:30 +1300 |
commit | e99c752927ba2e151ec887ea2e82e80d54ccea8c (patch) | |
tree | 7637f426eb24a3d0ea8db464e02996c422596721 | |
parent | 9dfe91a70781292bee0ecadf1ac5e13b495309eb (diff) | |
download | idalius-e99c752927ba2e151ec887ea2e82e80d54ccea8c.tar.xz |
Add configuration option for port
-rwxr-xr-x | saxrobot | 1 | ||||
-rw-r--r-- | sb_config.pm | 2 |
2 files changed, 2 insertions, 1 deletions
@@ -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; |