diff --git a/config/rootfiles/core/37/filelists/files b/config/rootfiles/core/37/filelists/files
index 3b1e88b1c..c6ee131f0 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 8d4a7da7d..5aaa5f41f 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;