aboutsummaryrefslogtreecommitdiff
path: root/tests/ftpserver.pl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/ftpserver.pl')
-rwxr-xr-xtests/ftpserver.pl11
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) {