--- trunk/lib/BackupPC/SearchLib.pm 2005/06/22 19:22:51 4 +++ trunk/lib/BackupPC/SearchLib.pm 2005/06/23 09:47:59 6 @@ -10,7 +10,7 @@ sub getUnits() { my @ret = (); my $tmp; - my $dbh = DBI->connect( "dbi:SQLite:dbname=$Conf{SearchDB}", + my $dbh = DBI->connect( "dbi:SQLite:dbname=${TopDir}/$Conf{SearchDB}", "", "", { RaiseError => 1, AutoCommit => 1 } ); my $st = $dbh->prepare( @@ -121,7 +121,7 @@ { my ($where) = @_; - my $dbh = DBI->connect( "dbi:SQLite:dbname=$Conf{SearchDB}", + my $dbh = DBI->connect( "dbi:SQLite:dbname=${TopDir}/$Conf{SearchDB}", "", "", { RaiseError => 1, AutoCommit => 1 } ); my $sql = q{ @@ -188,7 +188,7 @@ sub getBackupsNotBurned() { - my $dbh = DBI->connect( "dbi:SQLite:dbname=$Conf{SearchDB}", + my $dbh = DBI->connect( "dbi:SQLite:dbname=${TopDir}/$Conf{SearchDB}", "", "", { RaiseError => 1, AutoCommit => 1 } ); my $sql = q{ SELECT