Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 17091: Add AUTOLOAD to Koha::Objects

Browse source 
Up to now if a Koha::Objects based object needs to call DBIx::Class methods, we
have to create a new method for Koha::Objects, something like:
  sub method {
    my $self = shift;
    return $self->_resultset->method
  }

To simplify and ease the call to DBIx::Class method, this patch defines an
AUTOLOAD to call the DBIx::Class method on the resultset we are encapsulating.

Signed-off-by: Hector Castro <hector.hecaxmmx@gmail.com>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>

Signed-off-by: Brendan Gallagher <brendan@bywatersolutions.com>
This commit is contained in:
Jonathan Druart 2016-08-09 15:46:11 +01:00 committed by Brendan Gallagher
parent df3df9cf71
commit 6a2a15aae8
1 changed files with 22 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
Koha/Objects.pm
View file

@ -280,7 +280,29 @@ sub columns {
return Koha::Database->new->schema->resultset( $class->_type )->result_source->columns;
}
=head3 AUTOLOAD
The autoload method is used call DBIx::Class method on a resultset.
Important: If you plan to use one of the DBIx::Class methods you must provide
relevant tests in t/db_dependent/Koha/Objects.t
Currently count, pager, reset and update are covered.
=cut
sub AUTOLOAD {
my ( $self, @params ) = @_;
my $method = our $AUTOLOAD;
$method =~ s/.*:://;
my $r = eval { $self->_resultset->$method(@params) };
if ( $@ ) {
carp "No method $method found for " . ref($self) . " " . $@;
return
}
return $r;
}
=head3 _type