From 85dba20e8ecac63cd217d082cee3e3d460878b2c Mon Sep 17 00:00:00 2001
From: Stephen L Johnson <sjohnson@monsters.org>
Date: Sat, 22 Feb 2003 20:55:45 +0000
Subject: [PATCH] Changed getlines() to getline() for one line logins and
increased timeout. Thanks to Mical Dorocinski.
---
src/lib/Spong/Network/plugins/check_telnet | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/lib/Spong/Network/plugins/check_telnet b/src/lib/Spong/Network/plugins/check_telnet
index f5bc52f..bc523ff 100644
--- a/src/lib/Spong/Network/plugins/check_telnet
+++ b/src/lib/Spong/Network/plugins/check_telnet
@@ -1,5 +1,5 @@
# check_telnet - v 1.0 May 18, 2000 - scarpe01@tufts.edu
-# $Id: check_telnet,v 1.3 2000/11/29 17:14:30 sljohnson Exp $
+# $Id: check_telnet,v 1.4 2003/02/22 20:55:45 sljohnson Exp $
# Register the routine with the plugins registry
$PLUGINS{'telnet'} = \&check_telnet;
@@ -31,7 +31,7 @@ sub check_telnet {
}
$con->print("\n\n");
- my @data = $con->getlines((Timeout => 6));
+ my @data = $con->getline((Timeout => 15));
if (@data) {
$message .= "$host:$port -\n@data\n";
} else {
--
2.30.2