View | Details | Raw Unified | Return to bug 25043
Collapse All | Expand All

(-)a/Koha/Schema.pm (-1 / +4 lines)
Lines 9-15 use warnings; Link Here
9
9
10
use base 'DBIx::Class::Schema';
10
use base 'DBIx::Class::Schema';
11
11
12
__PACKAGE__->load_namespaces;
12
13
__PACKAGE__->load_namespaces(
14
   default_resultset_class => 'ResultSet',
15
);
13
16
14
17
15
# Created by DBIx::Class::Schema::Loader v0.07025 @ 2013-10-14 20:56:21
18
# Created by DBIx::Class::Schema::Loader v0.07025 @ 2013-10-14 20:56:21
(-)a/Koha/Schema/ResultSet.pm (+5 lines)
Line 0 Link Here
1
package Koha::Schema::ResultSet;
2
use strict;
3
use warnings;
4
use parent 'DBIx::Class::ResultSet';
5
__PACKAGE__->load_components('Helper::ResultSet::SetOperations');
(-)a/test.pl (-1 / +10 lines)
Line 0 Link Here
0
- 
1
use Modern::Perl;
2
use Koha::Database;
3
my $borrowernumber = 5;
4
my $holds = Koha::Database->new()->schema()->resultset('Reserve')->search({ borrowernumber => $borrowernumber });
5
my $old_holds = Koha::Database->new()->schema()->resultset('OldReserve')->search({ borrowernumber => $borrowernumber });
6
7
$_->result_class('DBIx::Class::ResultClass::HashRefInflator')
8
  for ($holds, $old_holds);
9
10
say $holds->union($old_holds)->count;

Return to bug 25043