From 725fd624277364402a86262486cdb79458db4ed8 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Thu, 18 Feb 2021 23:22:25 +0300 Subject: lei: check for IMAP auth errors We need to ensure authentication failures and error codes get propagated to the parent process(es) properly. v2: update MANIFEST v3: LeiAuth.pm ->_lei_cfg bit moved to a previous commit --- lib/PublicInbox/NetReader.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lib/PublicInbox') diff --git a/lib/PublicInbox/NetReader.pm b/lib/PublicInbox/NetReader.pm index ad8c18d0..61ea538b 100644 --- a/lib/PublicInbox/NetReader.pm +++ b/lib/PublicInbox/NetReader.pm @@ -89,6 +89,9 @@ sub mic_for { # mic = Mail::IMAPClient $self->{mic_arg}->{uri_section($uri)} = $mic_arg; } else { $err = "E: <$url> LOGIN: $@\n"; + if ($cred && defined($cred->{password})) { + $err =~ s/\Q$cred->{password}\E/*******/g; + } $mic = undef; } $cred->run($mic ? 'approve' : 'reject') if $cred; -- cgit v1.2.3-24-ge0c7