3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-12-24 11:42:35 +01:00

Minor indentation fix

This commit is contained in:
Pragmatic Software 2014-05-18 22:51:37 +00:00
parent 1cce945412
commit 020d512ee4
2 changed files with 14 additions and 14 deletions

View File

@ -112,13 +112,13 @@ sub initialize {
$self->{interpreter}->register(sub { return $self->{factoids}->interpreter(@_); }); $self->{interpreter}->register(sub { return $self->{factoids}->interpreter(@_); });
$self->{factoids} = PBot::Factoids->new( $self->{factoids} = PBot::Factoids->new(
pbot => $self, pbot => $self,
filename => delete $conf{factoids_file}, filename => delete $conf{factoids_file},
export_path => delete $conf{export_factoids_path}, export_path => delete $conf{export_factoids_path},
export_site => delete $conf{export_factoids_site}, export_site => delete $conf{export_factoids_site},
); );
$self->{quotegrabs} = PBot::Quotegrabs->new( $self->{quotegrabs} = PBot::Quotegrabs->new(
pbot => $self, pbot => $self,
filename => delete $conf{quotegrabs_file}, filename => delete $conf{quotegrabs_file},
export_path => delete $conf{export_quotegrabs_path}, export_path => delete $conf{export_quotegrabs_path},
@ -151,14 +151,14 @@ sub connect {
$self->{logger}->log("Connecting to $server ...\n"); $self->{logger}->log("Connecting to $server ...\n");
$self->{conn} = $self->{irc}->newconn( $self->{conn} = $self->{irc}->newconn(
Nick => $self->{registry}->get_value('irc', 'botnick'), Nick => $self->{registry}->get_value('irc', 'botnick'),
Username => $self->{registry}->get_value('irc', 'username'), Username => $self->{registry}->get_value('irc', 'username'),
Ircname => $self->{registry}->get_value('irc', 'ircname'), Ircname => $self->{registry}->get_value('irc', 'ircname'),
Server => $server, Server => $server,
SSL => $self->{registry}->get_value('irc', 'SSL'), SSL => $self->{registry}->get_value('irc', 'SSL'),
SSL_ca_file => $self->{registry}->get_value('irc', 'SSL_ca_file'), SSL_ca_file => $self->{registry}->get_value('irc', 'SSL_ca_file'),
SSL_ca_path => $self->{registry}->get_value('irc', 'SSL_ca_path'), SSL_ca_path => $self->{registry}->get_value('irc', 'SSL_ca_path'),
Port => $self->{registry}->get_value('irc', 'port')) Port => $self->{registry}->get_value('irc', 'port'))
or Carp::croak "$0: Can't connect to IRC server.\n"; or Carp::croak "$0: Can't connect to IRC server.\n";
$self->{connected} = 1; $self->{connected} = 1;

View File

@ -13,7 +13,7 @@ use warnings;
# These are set automatically by the build/commit script # These are set automatically by the build/commit script
use constant { use constant {
BUILD_NAME => "PBot", BUILD_NAME => "PBot",
BUILD_REVISION => 586, BUILD_REVISION => 587,
BUILD_DATE => "2014-05-18", BUILD_DATE => "2014-05-18",
}; };