diff options
| -rw-r--r-- | lib/Net/IMAP/InterIMAP.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Net/IMAP/InterIMAP.pm b/lib/Net/IMAP/InterIMAP.pm index 02ae65f..ef1c20b 100644 --- a/lib/Net/IMAP/InterIMAP.pm +++ b/lib/Net/IMAP/InterIMAP.pm @@ -450,7 +450,7 @@ sub new($%) { $self->fail("Unsupported authentication mechanism: $mech"); } - my $dbg; + my $dbg; delete $self->{password}; # no need to remember passwords if (($self->{debug} // 0) == 1) { $dbg = $self->{debug}--; |