summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xscript/imap-notify.pl6
1 files changed, 5 insertions, 1 deletions
diff --git a/script/imap-notify.pl b/script/imap-notify.pl
index f2f7c2c..cea3af1 100755
--- a/script/imap-notify.pl
+++ b/script/imap-notify.pl
@@ -16,7 +16,7 @@ use strict;
use App::ImapNotify;
use Function::Parameters;
use MCE::Hobo;
-use Log::Any::Adapter ('Stderr', log_level => "warn");
+use Log::Any::Adapter ('Stderr', log_level => "info");
my $config = [
{
@@ -37,6 +37,10 @@ my $config = [
#},
];
+if ($ARGV[0] // "" eq "--debug") {
+ Log::Any::Adapter->set("Stderr", log_level => "trace");
+}
+
#$IO::Socket::SSL::DEBUG = 4;
my @workers;