From b9c971968e49bef83646411d7c257ed6d721f051 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 7 Nov 2007 21:06:43 +0000
Subject: [PATCH] Patch from ISHIGAKI@cpan.org to suppress unnecessary warnings
 about undefined local_options, thanks!

---
 Changes           | 4 ++++
 DBSchema.pm       | 2 +-
 DBSchema/Table.pm | 4 ++--
 3 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/Changes b/Changes
index 24f1d66..bf6150f 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 Revision history for Perl extension DBIx::DBSchema.
 
+0.36 unreleased
+        - Patch from ISHIGAKI@cpan.org to suppress unnecessary warnings about
+          undefined local_options, thanks!
+
 0.35 Mon Oct 29 18:58:36 PDT 2007
         - Fix minor breakage (pretty_print) resulting from Jesse's changes.
 	- Update mysql driver to handle BIGSERIAL columns
diff --git a/DBSchema.pm b/DBSchema.pm
index 5cda990..8c89d1c 100644
--- a/DBSchema.pm
+++ b/DBSchema.pm
@@ -10,7 +10,7 @@ use DBIx::DBSchema::Column;
 use DBIx::DBSchema::ColGroup::Unique;
 use DBIx::DBSchema::ColGroup::Index;
 
-$VERSION = "0.35";
+$VERSION = "0.36";
 $VERSION = eval $VERSION; # modperlstyle: convert the string into a number
 
 $DEBUG = 0;
diff --git a/DBSchema/Table.pm b/DBSchema/Table.pm
index 6463ee0..225bcbb 100644
--- a/DBSchema/Table.pm
+++ b/DBSchema/Table.pm
@@ -10,7 +10,7 @@ use DBIx::DBSchema::Index;
 use DBIx::DBSchema::ColGroup::Unique;
 use DBIx::DBSchema::ColGroup::Index;
 
-$VERSION = '0.06';
+$VERSION = '0.07';
 $DEBUG = 0;
 
 =head1 NAME
@@ -360,7 +360,7 @@ sub local_options {
   if ( defined($value) ) {
     $self->{local_options} = $value;
   } else {
-    $self->{local_options};
+    defined $self->{local_options} ? $self->{local_options} : '';
   }
 }
 
-- 
2.11.0