From: David Kamholz Date: Thu, 27 Jul 2006 06:32:47 +0000 (+0000) Subject: small cleanup to ResultSourceProxy X-Git-Tag: v0.07002~67 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bfeb73b245d1b975443884bf9630f30ac5e8fdf5;p=dbsrgits%2FDBIx-Class.git small cleanup to ResultSourceProxy --- diff --git a/lib/DBIx/Class/ResultSourceProxy.pm b/lib/DBIx/Class/ResultSourceProxy.pm index 4301c00..a668164 100644 --- a/lib/DBIx/Class/ResultSourceProxy.pm +++ b/lib/DBIx/Class/ResultSourceProxy.pm @@ -27,22 +27,19 @@ sub add_columns { *add_column = \&add_columns; sub has_column { - my ($self, $column) = @_; - return $self->result_source_instance->has_column($column); + shift->result_source_instance->has_column(@_); } sub column_info { - my ($self, $column) = @_; - return $self->result_source_instance->column_info($column); + shift->result_source_instance->column_info(@_); } - sub columns { - return shift->result_source_instance->columns(@_); + shift->result_source_instance->columns(@_); } sub remove_columns { - return shift->result_source_instance->remove_columns(@_); + shift->result_source_instance->remove_columns(@_); } *remove_column = \&remove_columns;