ftpserver.pl: Updated argument code in STATUS_imap() to be more meaningful

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 2eed040..7364253 100755 (executable)
--- 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) {