[Treebase-guts] SF.net SVN: treebase:[38] trunk/treebase-core/src/main/perl/dump/sqldump

[<rv...@us...>]

Revision: 38
          http://treebase.svn.sourceforge.net/treebase/?rev=38&view=rev
Author:   rvos
Date:     2009-06-11 07:37:05 +0000 (Thu, 11 Jun 2009)

Log Message:
-----------
Changed SQL for fetching all tables

Modified Paths:
--------------
    trunk/treebase-core/src/main/perl/dump/sqldump

Modified: trunk/treebase-core/src/main/perl/dump/sqldump
===================================================================
--- trunk/treebase-core/src/main/perl/dump/sqldump	2009-06-11 07:33:41 UTC (rev 37)
+++ trunk/treebase-core/src/main/perl/dump/sqldump	2009-06-11 07:37:05 UTC (rev 38)
@@ -126,7 +126,7 @@
 sub get_all_tables {
 	my $schema_to_analyze = shift || $schema;
 	my $dbh = get_handle();
-	my $sth = $dbh->prepare(sprintf('list tables for schema %s', $schema_to_analyze));
+	my $sth = $dbh->prepare(sprintf(q{select tabname from syscat.tables where tabschema = '%s'}, $schema_to_analyze));
 	my @fetched_tables;
 	$sth->execute();
 	while ( my $row = $sth->fetchrow_hashref ) {


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.