From bec963c7b367ef42350849422fbc14675a6e5ff6 Mon Sep 17 00:00:00 2001 From: eleksir Date: Fri, 13 May 2022 18:05:15 +0300 Subject: [PATCH] Allow to parse any json-file as loosely formatted (not only config.json) --- lib/BotLib/Conf.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) {