From: Matt S Trout Date: Fri, 13 Jan 2006 23:55:50 +0000 (+0000) Subject: Chucked out some unrequired column case stuff in CDBICompat X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fc02b7673d45eba9dd36fbd127eb8e4afe21903b;p=dbsrgits%2FDBIx-Class-Historic.git Chucked out some unrequired column case stuff in CDBICompat --- diff --git a/lib/DBIx/Class/CDBICompat/ColumnCase.pm b/lib/DBIx/Class/CDBICompat/ColumnCase.pm index ae0a200..d79104d 100644 --- a/lib/DBIx/Class/CDBICompat/ColumnCase.pm +++ b/lib/DBIx/Class/CDBICompat/ColumnCase.pm @@ -84,16 +84,6 @@ sub _mk_group_accessors { @fields, @extra); } -sub _cond_key { - my ($class, $attrs, $key, @rest) = @_; - return $class->next::method($attrs, lc($key), @rest); -} - -sub _cond_value { - my ($class, $attrs, $key, @rest) = @_; - return $class->next::method($attrs, lc($key), @rest); -} - sub new { my ($class, $attrs, @rest) = @_; my %att;