]> git.etc.gen.nz Git - spong.git/commitdiff
set errmode() to 'return' so errors a return instead of check 'croak'ing
authorStephen L Johnson <sjohnson@monsters.org>
Tue, 19 Sep 2000 15:58:40 +0000 (15:58 +0000)
committerStephen L Johnson <sjohnson@monsters.org>
Tue, 19 Sep 2000 15:58:40 +0000 (15:58 +0000)
src/lib/Spong/Network/plugins/check_telnet

index c276402729d6a92f4e566b55f286e873adf1b76e..5cd96bf602ff69b888035db3201fc0f747e5e32a 100644 (file)
@@ -21,6 +21,7 @@ sub check_telnet {
 
        foreach $port (@ports) {
                my $con = new Net::Telnet;
+               $con->errmode('return');
                my $ok = $con->open(Host=> $host, Port => $port);
                if (! $ok) {
                        $color = "red";