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

(-)a/Koha/Acquisition/Basket.pm (-3 / +4 lines)
Lines 250-262 suitable for API output. Link Here
250
sub to_api {
250
sub to_api {
251
    my ( $self, $params ) = @_;
251
    my ( $self, $params ) = @_;
252
252
253
    my $json = $self->SUPER::to_api( $params );
253
    my $json_basket = $self->SUPER::to_api( $params );
254
    return unless $json_basket;
254
255
255
    $json->{closed} = ( $self->closedate )
256
    $json_basket->{closed} = ( $self->closedate )
256
                                    ? Mojo::JSON->true
257
                                    ? Mojo::JSON->true
257
                                    : Mojo::JSON->false;
258
                                    : Mojo::JSON->false;
258
259
259
    return $json;
260
    return $json_basket;
260
}
261
}
261
262
262
=head3 to_api_mapping
263
=head3 to_api_mapping
(-)a/Koha/Acquisition/Fund.pm (+2 lines)
Lines 62-67 sub to_api { Link Here
62
    my $budget_period_id = $self->budget_period_id;
62
    my $budget_period_id = $self->budget_period_id;
63
63
64
    my $json_fund = $self->SUPER::to_api($args);
64
    my $json_fund = $self->SUPER::to_api($args);
65
    return unless $json_fund;
66
65
    $json_fund->{fund_id}   = $budget_id;
67
    $json_fund->{fund_id}   = $budget_id;
66
    $json_fund->{budget_id} = $budget_period_id;
68
    $json_fund->{budget_id} = $budget_period_id;
67
69
(-)a/Koha/Acquisition/Invoice.pm (-3 / +4 lines)
Lines 41-53 suitable for API output. Link Here
41
sub to_api {
41
sub to_api {
42
    my ( $self, $params ) = @_;
42
    my ( $self, $params ) = @_;
43
43
44
    my $json = $self->SUPER::to_api( $params );
44
    my $json_invoice = $self->SUPER::to_api( $params );
45
    return unless $json_invoice;
45
46
46
    $json->{closed} = ( $self->closedate )
47
    $json_invoice->{closed} = ( $self->closedate )
47
                                    ? Mojo::JSON->true
48
                                    ? Mojo::JSON->true
48
                                    : Mojo::JSON->false;
49
                                    : Mojo::JSON->false;
49
50
50
    return $json;
51
    return $json_invoice;
51
}
52
}
52
53
53
=head3 to_api_mapping
54
=head3 to_api_mapping
(-)a/Koha/Biblio.pm (-3 / +5 lines)
Lines 979-988 on the API. Link Here
979
sub to_api {
979
sub to_api {
980
    my ($self, $args) = @_;
980
    my ($self, $args) = @_;
981
981
982
    my $response = $self->SUPER::to_api( $args );
982
    my $json_biblio = $self->SUPER::to_api( $args );
983
    my $biblioitem = $self->biblioitem->to_api;
983
    return unless $json_biblio;
984
    my $json_biblioitem = $self->biblioitem->to_api;
985
    return unless $json_biblioitem;
984
986
985
    return { %$response, %$biblioitem };
987
    return { %$json_biblio, %$json_biblioitem };
986
}
988
}
987
989
988
=head3 to_api_mapping
990
=head3 to_api_mapping
(-)a/Koha/SMTP/Server.pm (-4 / +4 lines)
Lines 112-121 suitable for API output. Link Here
112
sub to_api {
112
sub to_api {
113
    my ( $self, $params ) = @_;
113
    my ( $self, $params ) = @_;
114
114
115
    my $json = $self->SUPER::to_api( $params );
115
    my $json_smtp = $self->SUPER::to_api( $params );
116
    delete $json->{password};
116
    return unless $json_smtp;
117
    delete $json_smtp->{password};
117
118
118
    return $json;
119
    return $json_smtp;
119
}
120
}
120
121
121
=head3 to_api_mapping
122
=head3 to_api_mapping
122
- 

Return to bug 29523