[Rt-commit] r3023 - in DBIx-SearchBuilder: . trunk trunk/SearchBuilder

[glasser at bestpractical.com]

Author: glasser
Date: Wed Jun  1 18:06:30 2005
New Revision: 3023

Modified:
   DBIx-SearchBuilder/   (props changed)
   DBIx-SearchBuilder/trunk/   (props changed)
   DBIx-SearchBuilder/trunk/SearchBuilder/SchemaGenerator.pm
Log:


Modified: DBIx-SearchBuilder/trunk/SearchBuilder/SchemaGenerator.pm
==============================================================================
--- DBIx-SearchBuilder/trunk/SearchBuilder/SchemaGenerator.pm	(original)
+++ DBIx-SearchBuilder/trunk/SearchBuilder/SchemaGenerator.pm	Wed Jun  1 18:06:30 2005
@@ -83,20 +83,7 @@
 sub CreateTableSQLStatements {
   my $self = shift;
   # The sort here is to make it predictable, so that we can write tests.
-  return sort $self->_db_schema->sql($self->handle->dbh);
-}
-
-=for public_doc CreateTableSQLText
-
-Returns a string containg a sequence of SQL statements to create tables for all of
-the models added to the SchemaGenerator.
-
-=cut
-
-sub CreateTableSQLText {
-  my $self = shift;
-
-  return join "\n", map { "$_ ;\n" } $self->CreateTableSQLStatements;
+  return join "\n\n", map { "$_ ;" } sort $self->_db_schema->sql($self->handle->dbh);
 }
 
 =for private_doc _DBSchemaTableFromModel MODEL