added humanly readable unit (b k M G)

[BackupPC.git] / bin / BackupPC_ASA_SearchUpdate

diff --git a/bin/BackupPC_ASA_SearchUpdate b/bin/BackupPC_ASA_SearchUpdate
index 5615abb..279b8b0 100755 (executable)
--- a/bin/BackupPC_ASA_SearchUpdate
+++ b/bin/BackupPC_ASA_SearchUpdate
@@ -357,8 +357,6 @@ if ($opt->create) {
                $dbh->do( qq{ CREATE SEQUENCE $seq } );
        }
 
-=for later
-
        print " creating triggers ";
        $dbh->do( <<__END_OF_TRIGGER__ );
 
@@ -420,8 +418,6 @@ create trigger do_backup_backup_parts_check
 
 __END_OF_TRIGGER__
 
-=cut
-
        print "...\n";
 
        $dbh->commit;
@@ -534,7 +530,7 @@ foreach my $host_key (@hosts) {
                print $share_header unless $opt->quiet;
                status "$hostname $backupNum $share_header";
 
-               my $files = BackupPC::View->new($bpc, $hostname, \@backups, { only_first => 1 });
+               my $files = BackupPC::View->new($bpc, $hostname, \@backups, { only_increment => 1 });
 
                foreach my $share ($files->shareList($backupNum)) {
 
@@ -598,8 +594,10 @@ foreach my $host_key (@hosts) {
 
                        if ($nf + $nd > 0) {
                                status "$hostname $backupNum full-text | indexing";
-                               eval { hest_update($hostID, $shareID, $backupNum) };
-                               warn "ERROR: $@" if $@;
+                               #eval { hest_update($hostID, $shareID, $backupNum) };
+                               #warn "ERROR: $@" if $@;
+                               hest_update($hostID, $shareID, $backupNum);
+                               # eval breaks our re-try logic
                        }
                }