This patch adds from_api_mapping to Koha::Objects, in order to be able to get the mapping from a result set.
To test:
1. apply this patch
2. prove t/db_dependent/Koha/Objects.t
3. sign off
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
return $self->{_singular_object}->attributes_from_api( $attributes );
}
+=head3 from_api_mapping
+
+ my $mapped_attributes_hash = $objects->from_api_mapping;
+
+Attributes map from the API to DBIC
+
+=cut
+
+sub from_api_mapping {
+ my ( $self ) = @_;
+
+ $self->{_singular_object} ||= $self->object_class->new();
+ return $self->{_singular_object}->from_api_mapping;
+}
+
=head3 Koha::Objects->_wrap
wraps the DBIC object in a corresponding Koha object
use Modern::Perl;
-use Test::More tests => 19;
+use Test::More tests => 20;
use Test::Exception;
use Test::Warn;
$schema->storage->txn_rollback;
};
+
+subtest "from_api_mapping() tests" => sub {
+
+ plan tests => 1;
+
+ $schema->storage->txn_begin;
+
+ my $cities_rs = Koha::Cities->new;
+ my $city = Koha::City->new;
+
+ is_deeply(
+ $cities_rs->from_api_mapping,
+ $city->from_api_mapping
+ );
+
+ $schema->storage->txn_rollback;
+};
\ No newline at end of file