diff options
Diffstat (limited to 'tests')
-rwxr-xr-x | tests/ftpserver.pl | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl index 2eed040d4..736425328 100755 --- a/tests/ftpserver.pl +++ b/tests/ftpserver.pl @@ -1450,15 +1450,18 @@ sub EXAMINE_imap { } sub STATUS_imap { - my ($testno) = @_; - fix_imap_params($testno); + my ($args) = @_; + my ($mailbox, $what) = split(/ /, $args, 2); + fix_imap_params($mailbox); - logmsg "STATUS_imap got $testno\n"; + logmsg "STATUS_imap got $args\n"; - if ($testno eq "") { + if ($mailbox eq "") { sendcontrol "$cmdid BAD Command Argument\r\n"; } else { + my $testno = $mailbox; + $testno =~ s/[^0-9]//g; my $testpart = ""; if ($testno > 10000) { |