Merge pull request 'issue-1-config_file' (#3) from issue-1-config_file into master
This commit was merged in pull request #3.
	This commit is contained in:
		@@ -9,6 +9,7 @@ no warnings qw(experimental);
 | 
			
		||||
 | 
			
		||||
# core packages
 | 
			
		||||
use Encode;
 | 
			
		||||
use FindBin;
 | 
			
		||||
 | 
			
		||||
# CPAN packages
 | 
			
		||||
use JSON;
 | 
			
		||||
@@ -19,7 +20,7 @@ use YAML;
 | 
			
		||||
package F1DataBot;
 | 
			
		||||
 | 
			
		||||
# Constants and initalisations
 | 
			
		||||
Log::Log4perl->init('log.conf');
 | 
			
		||||
Log::Log4perl->init("$FindBin::Bin/log.conf");
 | 
			
		||||
 | 
			
		||||
sub new {
 | 
			
		||||
    my ( $Type, %Param ) = @_;
 | 
			
		||||
@@ -38,7 +39,7 @@ sub new {
 | 
			
		||||
    };
 | 
			
		||||
 | 
			
		||||
    # load remembered update ids
 | 
			
		||||
    $Self->{MessageIDs} = YAML::LoadFile('message_ids.yml');
 | 
			
		||||
    $Self->{MessageIDs} = YAML::LoadFile("$FindBin::Bin/message_ids.yml");
 | 
			
		||||
 | 
			
		||||
    return $Self;
 | 
			
		||||
}
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user