aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYang Tse <yangsita@gmail.com>2010-01-18 17:47:01 +0000
committerYang Tse <yangsita@gmail.com>2010-01-18 17:47:01 +0000
commit0a713139f6a0ee8b55b8bb9839059c5b5e4d99a1 (patch)
tree7c4937142e163a0cc83b4211d26af5eabcf6ee85
parent0687bc6bd617de33fa5e8e53428993896a3fd4e7 (diff)
fix warnings
-rwxr-xr-xtests/runtests.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/runtests.pl b/tests/runtests.pl
index 06eb01c43..2b74f6b47 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -728,7 +728,7 @@ sub verifyhttp {
sub verifyftp {
my ($proto, $ipvnum, $idnum, $ip, $port) = @_;
my $server = servername_id($proto, $ipvnum, $idnum);
- my $pid;
+ my $pid = 0;
my $time=time();
my $extra="";
if($proto eq "ftps") {
@@ -755,7 +755,7 @@ sub verifyftp {
last;
}
}
- if($pid <= 0 && $data[0]) {
+ if($pid <= 0 && @data && $data[0]) {
# this is not a known server
logmsg "RUN: Unknown server on our ". uc($proto) ." port: $port\n";
return 0;