ftpserver.pl: Fixed IMAP SEARCH command

1 files changed, 4 insertions, 3 deletions

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 0e4a7bce6..d5ae6bbf6 100755
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -1033,12 +1033,13 @@ sub STATUS_imap {
 }
 
 sub SEARCH_imap {
-    my ($testno) = @_;
-    fix_imap_params($testno);
+    my ($what) = @_;
+    my $testno = $selected;
+    fix_imap_params($what);
 
     logmsg "SEARCH_imap got test $testno\n";
 
-    $testno =~ s/[^0-9]//g;
+    $testno =~ s/^([^0-9]*)//;
     my $testpart = "";
     if ($testno > 10000) {
         $testpart = $testno % 10000;