From 91bc781441cafde27a9b9794eb3ecf6f0776e92f Mon Sep 17 00:00:00 2001 From: Michael Tremer Date: Wed, 3 Mar 2010 10:45:47 +0100 Subject: [PATCH] pakfire: Change pingtest to use icmp again. --- config/rootfiles/core/37/filelists/files | 1 + src/pakfire/lib/functions.pl | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/config/rootfiles/core/37/filelists/files b/config/rootfiles/core/37/filelists/files index 3b1e88b1c9..c6ee131f00 100644 --- a/config/rootfiles/core/37/filelists/files +++ b/config/rootfiles/core/37/filelists/files @@ -20,3 +20,4 @@ usr/local/bin/sshctrl var/ipfire/langs/de.pl var/ipfire/langs/en.pl var/ipfire/langs/fr.pl +opt/pakfire/lib/pakfire.pl diff --git a/src/pakfire/lib/functions.pl b/src/pakfire/lib/functions.pl index 8d4a7da7db..5aaa5f41fa 100644 --- a/src/pakfire/lib/functions.pl +++ b/src/pakfire/lib/functions.pl @@ -116,7 +116,7 @@ sub usage { sub pinghost { my $host = shift; - $p = Net::Ping->new(); + $p = Net::Ping->new("icmp"); if ($p->ping($host)) { logger("PING INFO: $host is alive"); return 1; -- 2.39.2