diff options
-rw-r--r-- | Net/POP3.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Net/POP3.pm b/Net/POP3.pm index 0ba25a6..f78e384 100644 --- a/Net/POP3.pm +++ b/Net/POP3.pm @@ -13,7 +13,7 @@ use Net::Cmd; use Carp; use Net::Config; -$VERSION = "2.16"; # $Id: //depot/libnet/Net/POP3.pm#10 $ +$VERSION = "2.17"; # $Id: //depot/libnet/Net/POP3.pm#11 $ @ISA = qw(Net::Cmd IO::Socket::INET); @@ -272,7 +272,7 @@ sub _NOOP { shift->command('NOOP')->response() == CMD_OK } sub _RSET { shift->command('RSET')->response() == CMD_OK } sub _QUIT { shift->command('QUIT')->response() == CMD_OK } sub _TOP { shift->command('TOP', @_)->response() == CMD_OK } -sub _UIDL { shift->command('UIDL')->response() == CMD_OK } +sub _UIDL { shift->command('UIDL',@_)->response() == CMD_OK } sub _USER { shift->command('USER',$_[0])->response() == CMD_OK } sub _PASS { shift->command('PASS',$_[0])->response() == CMD_OK } sub _APOP { shift->command('APOP',@_)->response() == CMD_OK } |