Commit fd634a3e authored by Robert Ricci's avatar Robert Ricci

Use the Mysql module directly, rather than the testbed modules. We had

a bootstrapping problem - this script is required to install into the
main tree, but of course, the testbed libraries are no there the first
time!
parent 51310e62
......@@ -16,16 +16,27 @@ use English;
#
# Configure variables
#
use lib '@prefix@/lib';
use libdb;
my $DBNAME = '@TBDBNAME@';
my $mysqldump = "mysqldump";
#
# We use the bare Mysql module instead of the testbed libdb, so that this
# script can run from a first-time installation, before the latter is
# installed.
#
use Mysql;
#
# Build a list of tables to export
#
my $result = DBQueryFatal("select table_name from exported_tables");
my $dbh = Mysql->connect('localhost',$DBNAME,undef,undef);
if (!$dbh) {
die("Unable to connect to mysqld - Either it's not running or \n" .
"permission was denied.\n");
}
my $result = $dbh->query("select table_name from exported_tables");
my $table_names;
while (my ($table_name) = $result->fetchrow()) {
$table_names .= "$table_name ";
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment