talks more on verbose

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index c5c7e7b5c7b807409bda30b88d7b96542790df09..4f1cd68984f858f799b5a1ed5284c34fce9eeb12 100644 (file)
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -350,6 +350,10 @@ for ( $waitedpid = 0;
     &customize(); # read test control instructions
 
     print @welcome;
+    if($verbose) {
+        print STDERR "OUT:\n";
+        print STDERR @welcome;
+    }
     my $state="fresh";
 
     while(1) {