From 6429c378a2479255f2f5a663758ff87dcec5ddf6 Mon Sep 17 00:00:00 2001
From: Daniel Stenberg <daniel@haxx.se>
Date: Mon, 22 Jan 2001 16:16:18 +0000
Subject: [PATCH] the custom reply engine was not inited properly

---
 tests/ftpserver.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 918df0ca7b..c5c7e7b5c7 100644
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -76,6 +76,7 @@ my %commandok = (
                  'SIZE' => 'loggedin|twosock',
                  'PWD'  => 'loggedin|twosock',
                  'QUIT'  => 'loggedin|twosock',
+                 'DELE' => 'loggedin|twosock'
                  );
 
 # initially, we're in 'fresh' state
@@ -97,6 +98,7 @@ my %displaytext = ('USER' => '331 We are happy you popped in!',
                    'QUIT' => '221 bye bye baby', # just reply something
                    'PWD'  => '257 "/nowhere/anywhere" is current directory',
                    'REST' => '350 Yeah yeah we set it there for you',
+                   'DELE' => '200 OK OK OK whatever you say'
                    );
 
 # callback functions for certain commands
@@ -300,6 +302,7 @@ $SIG{CHLD} = \&REAPER;
 
 my %customreply;
 sub customize {
+    undef %customreply;
     open(CUSTOM, "<log/ftpserver.cmd") ||
         return 1;
 
@@ -307,7 +310,6 @@ sub customize {
         print STDERR "FTPD: Getting commands from log/ftpserver.cmd\n";
     }
 
-    undef %customreply;
     while(<CUSTOM>) {
         if($_ =~ /REPLY ([A-Z]+) (.*)/) {
             $customreply{$1}=$2;
-- 
GitLab