Commit 13a2e325 authored by Steve Holme's avatar Steve Holme
Browse files

ftpserver.pl: Fixed IMAP SEARCH command

parent c3b513e7

tests/ftpserver.pl

+4 −3
Original line number Diff line number Diff line
@@ -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;