use strict;
use BackupPC::CGI::Lib qw(:all);
-use BackupPC::SearchLib;
+use BackupPC::Search;
use Data::Dumper;
use vars qw($Cgi %In $MyURL $User %Conf $TopDir $BinDir $bpc);
EOF
$cont .= "Backups that have not been archived:<br>";
- $cont .= BackupPC::SearchLib::displayBackupsGrid( \%In );
+ $cont .= BackupPC::Search::displayBackupsGrid( \%In );
} else {
my ($host_id, $backup_num, $backup_id) = ($1,$2,$3);
push @selected_backup_ids, $backup_id;
- my $currSize = BackupPC::SearchLib::getGzipSizeFromBackupID($backup_id);
+ my $currSize = BackupPC::Search::getGzipSizeFromBackupID($backup_id);
my $sth_size = $dbh->prepare(q{select inc_size from backups where id = ?});
$sth_size -> execute( $backup_id );
my $db_size = $sth_size->fetchrow_hashref()->{inc_size};