diff --git a/t/plugin_tests/auth/auth_imap b/t/plugin_tests/auth/auth_imap index 2c2c76f..0998452 100644 --- a/t/plugin_tests/auth/auth_imap +++ b/t/plugin_tests/auth/auth_imap @@ -3,24 +3,22 @@ use Test::More tests => 2; use strict; use lib 't'; - use_ok('Net::IMAP::Simple'); sub auth_imap { - use Net::IMAP::Simple::SSL; + use Net::IMAP::Simple::SSL; - my ($imaphost, $imapport, $imapserver); + my ($imaphost, $imapport, $imapserver); - $imaphost = "imap.gmail.com"; - $imapport = "993"; - $imapserver = "$imaphost:$imapport"; + $imaphost = "imap.gmail.com"; + $imapport = "993"; + $imapserver = "$imaphost:$imapport"; - my $server = Net::IMAP::Simple->new($imapserver, use_ssl => 1,) - or return ("auth_imap - could not connect to $imapserver"); - sleep 1; - $server->quit; + my $server = Net::IMAP::Simple->new($imapserver, use_ssl => 1,) + or return ("auth_imap - could not connect to $imapserver"); + sleep 1; + $server->quit; } - ok(auth_imap, "auth_imap, connected to imap.gmail.com for a sec");