X-Git-Url: http://git.ipfire.org/?p=people%2Fpmueller%2Fipfire-2.x.git;a=blobdiff_plain;f=src%2Fpakfire%2Flib%2Ffunctions.pl;h=d2ad7e34a479ebc53850648a78e7437a316288cf;hp=491c4b076c283897b310c952dab76cd1c56a404b;hb=d59b02f177dce0e077da5256eee68d2cf10b2bfd;hpb=e4e4b3f975a3b267a68fe2649af76e3d609c866c

diff --git a/src/pakfire/lib/functions.pl b/src/pakfire/lib/functions.pl
index 491c4b076c..d2ad7e34a4 100644
--- a/src/pakfire/lib/functions.pl
+++ b/src/pakfire/lib/functions.pl
@@ -324,7 +324,11 @@ sub selectmirror {
 				$proto = $templine[0];
 				$host = $templine[1];
 				$path = $templine[2];
-				if (pinghost("$host")) {
+				if ($pakfiresettings{'HEALTHCHECK'} eq "off") {
+				 	logger("PING INFO: Healthcheck is disabled");
+					$found = 1;
+					return ($proto, $host, $path);
+				elsif (pinghost("$host")) {
 					$found = 1;
 					return ($proto, $host, $path);
 				}
@@ -404,13 +408,14 @@ sub dblist {
 			}
 		}
 	
-		opendir(DIR,"$Conf::dbdir/meta");
+		opendir(DIR,"$Conf::dbdir/installed");
 		my @files = readdir(DIR);
 		closedir(DIR);
 		foreach $file (@files) {
 			next if ( $file eq "." );
 			next if ( $file eq ".." );
-			open(FILE, "<$Conf::dbdir/meta/$file");
+			next if ( $file =~ /^old/ );
+			open(FILE, "<$Conf::dbdir/installed/$file");
 			@meta = <FILE>;
 			close(FILE);
 			foreach $line (@meta) {