Skip to content
Snippets Groups Projects
Commit 7e26fad8 authored by Guillaume ROUSSE's avatar Guillaume ROUSSE
Browse files

use command-line option first for configuration file location

parent f13ad54c
No related branches found
No related tags found
No related merge requests found
......@@ -29,7 +29,10 @@ GetOptions(
-verbose => 0
);
my $configuration_file = $ENV{ACCESS_CHECK_CONFIG} || 'conf/manager.conf';
my $configuration_file =
$options{configuration} ||
$ENV{ACCESS_CHECK_CONFIG} ||
curfile()->dirname()->sibling('conf', 'manager.conf');
my $configuration = Config::Tiny->read($configuration_file);
if (!$configuration) {
die Config::Tiny->errstr() . "\n";
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment