@@ -, +, @@ --- Koha/Schema/Result/Biblio.pm | 10 +++++----- Koha/Schema/Result/Item.pm | 16 +++++----------- t/db_dependent/Items.t | 3 +-- 3 files changed, 11 insertions(+), 18 deletions(-) --- a/Koha/Schema/Result/Biblio.pm +++ a/Koha/Schema/Result/Biblio.pm @@ -331,10 +331,10 @@ __PACKAGE__->many_to_many("sets", "oai_sets_biblios", "set"); # Created by DBIx::Class::Schema::Loader v0.07025 @ 2013-10-14 20:56:21 # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:0//8OGf7OteNnwT03g4QsA -__PACKAGE__->belongs_to( - "biblioitem", - "Koha::Schema::Result::Biblioitem", - { "foreign.biblionumber" => "self.biblionumber" } -); +sub biblioitem { + my ( $self ) = @_; + my @biblioitems = $self->biblioitems; + return $biblioitems[0]; +} 1; --- a/Koha/Schema/Result/Item.pm +++ a/Koha/Schema/Result/Item.pm @@ -612,17 +612,11 @@ __PACKAGE__->might_have( # Created by DBIx::Class::Schema::Loader v0.07039 @ 2014-10-24 09:58:16 # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:2slVK/FjcRDiYLeufoOFQQ -__PACKAGE__->belongs_to( - "biblio", - "Koha::Schema::Result::Biblio", - { "foreign.biblionumber" => "self.biblionumber" } -); - -__PACKAGE__->belongs_to( - "biblioitem", - "Koha::Schema::Result::Biblioitem", - { biblioitemnumber => "biblioitemnumber" }, -); +sub biblioitem { + my ( $self ) = @_; + my @biblioitems = $self->biblioitemnumber; + return $biblioitems[0]; +} sub effective_itemtype { my ( $self ) = @_; --- a/t/db_dependent/Items.t +++ a/t/db_dependent/Items.t @@ -215,8 +215,7 @@ subtest q{Test Koha::Database->schema()->resultset('Item')->itemtype()} => sub { } ); - my $biblioitem = $biblio->biblioitem(); - my ( $item ) = $biblioitem->items(); + my ( $item ) = $biblio->biblioitem->items(); C4::Context->set_preference( 'item-level_itypes', 0 ); ok( $item->effective_itemtype() eq 'BIB_LEVEL', '$item->itemtype() returns biblioitem.itemtype when item-level_itypes is disabled' ); --