From: Justin Wheeler Date: Thu, 26 Apr 2007 17:58:16 +0000 (+0000) Subject: I'm a retard. X-Git-Tag: v0.08010~150^2~84 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=36d18cd952538e9217aaf2cfd2568a9409d46e92;p=dbsrgits%2FDBIx-Class.git I'm a retard. --- diff --git a/lib/DBIx/Class/Storage/DBI/Oracle.pm b/lib/DBIx/Class/Storage/DBI/Oracle.pm index ea956ba..d2fef18 100644 --- a/lib/DBIx/Class/Storage/DBI/Oracle.pm +++ b/lib/DBIx/Class/Storage/DBI/Oracle.pm @@ -5,13 +5,9 @@ use warnings; use base qw/DBIx::Class::Storage::DBI/; -print STDERR "Oracle.pm got called.\n"; - sub _rebless { my ($self) = @_; - print STDERR "Rebless got called.\n"; - my $version = eval { $self->_dbh->get_info(18); }; if ( !$@ ) { @@ -22,12 +18,9 @@ sub _rebless { ? 'DBIx::Class::Storage::DBI::Oracle::WhereJoins' : 'DBIx::Class::Storage::DBI::Oracle::Generic'; - print STDERR "Class: $class\n"; - # Load and rebless eval "require $class"; - print STDERR "\$@: $@\n"; bless $self, $class unless $@; } }