From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Wed, 16 Feb 2011 17:25:58 +0000 (+0100)
Subject: pre-seed with on disk backups
X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=commitdiff_plain;h=ef9301b407599b033433abaa9d43ad6294bb663b;hp=c615e1bfc6f2b0604a2658996f5dd6b6cfa9469c

pre-seed with on disk backups
---

diff --git a/lib/BackupPC/Search.pm b/lib/BackupPC/Search.pm
index a6f01ff..7f75add 100644
--- a/lib/BackupPC/Search.pm
+++ b/lib/BackupPC/Search.pm
@@ -371,6 +371,8 @@ sub host_backup_nums {
 	# and inc_size < 0 and size > 0 and not inc_deleted
 
 	my $all_backup_numbers;
+	# pre-seed with on disk backups
+	$all_backup_numbers->{ $_->{num} }++ foreach $bpc->BackupInfoRead($host);
 
 	while( my $row = $sth->fetchrow_hashref ) {
 warn "# row ",dump $row;