diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 46f4774b997e2d5cc26293690c1dd539e9d6de5b..d95194ee255508d35dbe7bbb7794c59a5c48a076 100755
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -781,7 +781,7 @@ sub CAPABILITY_imap {
     return 0;
 }
 
-sub SELECT_IMAP {
+sub SELECT_imap {
     my ($testno) = @_;
     my @data;
     my $size;