X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=lib%2FBackupPC%2FCGI%2FBurnMedia.pm;fp=lib%2FBackupPC%2FCGI%2FBurnMedia.pm;h=7d7eff31d7537e191a1c6a7a68078f1e3f5c2143;hp=8f29a079eb9a8cac45ceaf2c02431dcbcdcbc218;hb=c895c85bd282936cd38d900904bd94734fdc8248;hpb=be11cc4fd68cb4f99554d1d26233d52a854ed7f4 diff --git a/lib/BackupPC/CGI/BurnMedia.pm b/lib/BackupPC/CGI/BurnMedia.pm index 8f29a07..7d7eff3 100644 --- a/lib/BackupPC/CGI/BurnMedia.pm +++ b/lib/BackupPC/CGI/BurnMedia.pm @@ -2,7 +2,7 @@ package BackupPC::CGI::BurnMedia; 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); @@ -31,7 +31,7 @@ sub action() { EOF $cont .= "Backups that have not been archived:
"; - $cont .= BackupPC::SearchLib::displayBackupsGrid( \%In ); + $cont .= BackupPC::Search::displayBackupsGrid( \%In ); } else { @@ -46,7 +46,7 @@ EOF 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};