diff --git a/lib/BotLib/Conf.pm b/lib/BotLib/Conf.pm index 9c34f06..e0b1f70 100644 --- a/lib/BotLib/Conf.pm +++ b/lib/BotLib/Conf.pm @@ -14,7 +14,7 @@ use Exporter qw (import); our @EXPORT_OK = qw (LoadConf); sub LoadConf { - my $c = 'data/config.json'; + my $c = shift // 'data/config.json'; my $CH; unless (open $CH, '<', $c) {