Remove leftovers

diff --git a/lib/DBIx/Class/Admin.pm b/lib/DBIx/Class/Admin.pm
index b43e23b..366c2b4 100644 (file)
--- a/lib/DBIx/Class/Admin.pm
+++ b/lib/DBIx/Class/Admin.pm
@@ -90,8 +90,6 @@ sub _build_schema {
   require Class::MOP;
   {
     my @include_dirs = @{$self->include_dirs};
-    $self->_debug("Adding to \@INC:\n".join "\n",@include_dirs)
-        if $self->debug;
     local @INC = (@include_dirs, @INC);
     Class::MOP::load_class($self->schema_class);
   }
@@ -296,20 +294,6 @@ has quiet => (
   isa => Bool,
 );
 
-=head2 debug
-
-Print debug information
-
-=cut
-
-has debug => (
-  is => 'rw',
-  isa => Bool,
-  default => 0
-);
-
-sub _debug { shift; print @_ }
-
 has '_confirm' => (
   is  => 'bare',
   isa => Bool,

diff --git a/script/dbicadmin b/script/dbicadmin
index cc24560..c2b9ccf 100755 (executable)
--- a/script/dbicadmin
+++ b/script/dbicadmin
@@ -87,7 +87,7 @@ if($opts->{selfinject_pod}) {
     );
 }
 
-# FIXME - lowercasin will eventually go away when Getopt::Long::Descriptive is fixed
+# FIXME - lowercasing will eventually go away when Getopt::Long::Descriptive is fixed
 if($opts->{i}) {
     $opts->{include_dirs} = delete $opts->{i};
 }