a stupid typo and some additions

[dbsrgits/SQL-Translator-2.0-ish.git] / lib / SQL / Translator / Object / Schema.pm

diff --git a/lib/SQL/Translator/Object/Schema.pm b/lib/SQL/Translator/Object/Schema.pm
index babad8f..88710d2 100644 (file)
--- a/lib/SQL/Translator/Object/Schema.pm
+++ b/lib/SQL/Translator/Object/Schema.pm
@@ -1,9 +1,10 @@
 package SQL::Translator::Object::Schema;
 use Moose;
-use MooseX::Types::Moose qw(ArrayRef);
+use MooseX::Types::Moose qw(ArrayRef Str);
 use SQL::Translator::Types qw(Procedure Table View);
 
-has 'tables' => (is => 'ro', isa => ArrayRef[Table], required => 1);
+has 'name' => (is => 'ro', isa => Str, required => 1, default => '__DEFAULT__');
+has 'tables' => (is => 'ro', isa => ArrayRef[Table], required => 0);
 has 'views' => (is => 'ro', isa => ArrayRef[View], required => 0);
 has 'procedures' => (is => 'ro', isa => ArrayRef[Procedure], required => 0);