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 1084-1093 on the API. Link Here
1084
sub to_api {
1084
sub to_api {
1085
    my ($self, $args) = @_;
1085
    my ($self, $args) = @_;
1086
1086
1087
    my $response = $self->SUPER::to_api( $args );
1087
    my $json_biblio = $self->SUPER::to_api( $args );
1088
    my $biblioitem = $self->biblioitem->to_api;
1088
    return unless $json_biblio;
1089
    my $json_biblioitem = $self->biblioitem->to_api;
1090
    return unless $json_biblioitem;
1089
1091
1090
    return { %$response, %$biblioitem };
1092
    return { %$json_biblio, %$json_biblioitem };
1091
}
1093
}
1092
1094
1093
=head3 to_api_mapping
1095
=head3 to_api_mapping
(-)a/Koha/SMTP/Server.pm (-4 / +4 lines)
Lines 111-120 suitable for API output. Link Here
111
sub to_api {
111
sub to_api {
112
    my ( $self, $params ) = @_;
112
    my ( $self, $params ) = @_;
113
113
114
    my $json = $self->SUPER::to_api( $params );
114
    my $json_smtp = $self->SUPER::to_api( $params );
115
    delete $json->{password};
115
    return unless $json_smtp;
116
    delete $json_smtp->{password};
116
117
117
    return $json;
118
    return $json_smtp;
118
}
119
}
119
120
120
=head3 to_api_mapping
121
=head3 to_api_mapping
121
- 

Return to bug 29523