Set log verbosity of CHI::Driver to warn to avoid excessive logging flood

bin/aleesa-telegram-bot

@@ -93,6 +93,18 @@ if ($UID == 0) {
 
 if (defined $logfile) {
 	Log::Any::Adapter->set ('File', $logfile);
+
+	# Some annoying CHI logging events come with category set to CHI::Driver and log_level set to debug.
+	# Until we use start using Log::Any native features and set whole loglevel accordingly, lets lower
+	# verbosity paticulary for CHI.
+	Log::Any::Adapter->set (
+		{
+			category => 'CHI::Driver'
+		},
+		'File',
+		$logfile,
+		log_level => 'warn'
+	);
 } else {
 	Log::Any::Adapter->set ('File', '/dev/null');
 }