pakfire: Change pingtest to use icmp again.
[people/pmueller/ipfire-2.x.git] / src / pakfire / lib / functions.pl
index 8d4a7da..5aaa5f4 100644 (file)
@@ -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;