diff --git a/lib/Mail/Box/Manager.pm b/lib/Mail/Box/Manager.pm index 92aafda..e5a897c 100644 --- a/lib/Mail/Box/Manager.pm +++ b/lib/Mail/Box/Manager.pm @@ -375,6 +375,7 @@ sub open(@) $args{folder} = $name; } + # Do not show password in folder name my $type = $args{type}; if(!defined $type) { ; } elsif($type eq 'pop3' || $type eq 'pop') @@ -401,10 +402,6 @@ sub open(@) my $port = $args{server_port} ||= 993; $args{folderdir} = $name = "imap4s://$un\@$srv:$port"; } - else - { $self->log(ERROR => "Unknown folder type '$type'."); - return undef; - } unless(defined $name && length $name) { $self->log(ERROR => "No foldername specified to open."); diff --git a/lib/Mail/Box/Net.pm b/lib/Mail/Box/Net.pm index 0a2c74f..a093bed 100644 --- a/lib/Mail/Box/Net.pm +++ b/lib/Mail/Box/Net.pm @@ -39,12 +39,10 @@ At the moment, this object is extended by =over 4 =item * M - Implements the POP3 protocol. =item * M - -Implements the IMAP4 protocol. B +Implements the IMAP4 protocol. =back