add database attribute

[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 b9ab39a..0164c57 100644 (file)
--- a/lib/SQL/Translator/Object/Schema.pm
+++ b/lib/SQL/Translator/Object/Schema.pm
@@ -9,6 +9,11 @@ class SQL::Translator::Object::Schema extends SQL::Translator::Object {
         required => 1,
         default => ''
     );
+
+    has 'database' => (
+        is => 'rw',
+        isa => Maybe[Str],
+    );
     
     has 'tables' => (
         traits => ['Hash'],