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

(-)a/opac/unapi (-5 / +5 lines)
Lines 107-113 my $id = $cgi->param('id'); Link Here
107
my $format = $cgi->param('format');
107
my $format = $cgi->param('format');
108
108
109
if (not defined $format) {
109
if (not defined $format) {
110
    emit_formats($id);
110
    emit_formats($id, $format_to_stylesheet_map, $format_info, $cgi);
111
} elsif ($id) {
111
} elsif ($id) {
112
112
113
    # koha:biblionumber:0152018484
113
    # koha:biblionumber:0152018484
Lines 123-129 if (not defined $format) { Link Here
123
                exit 0;
123
                exit 0;
124
            }
124
            }
125
125
126
            my $transformer = get_transformer($format);
126
            my $transformer = get_transformer($format, $format_to_stylesheet_map, $format_info);
127
            unless (defined $transformer) {
127
            unless (defined $transformer) {
128
                print $cgi->header( -status => '406 invalid format requested' );
128
                print $cgi->header( -status => '406 invalid format requested' );
129
                exit 0;
129
                exit 0;
Lines 154-160 if (not defined $format) { Link Here
154
exit 0;
154
exit 0;
155
155
156
sub emit_formats {
156
sub emit_formats {
157
    my $id = shift;
157
    my ($id, $format_to_stylesheet_map, $format_info, $cgi) = @_;
158
158
159
    if (defined $id) {
159
    if (defined $id) {
160
        print $cgi->header( -type =>'application/xml', -status => '300 multiple choices' );
160
        print $cgi->header( -type =>'application/xml', -status => '300 multiple choices' );
Lines 179-185 sub emit_formats { Link Here
179
179
180
180
181
sub get_transformer {
181
sub get_transformer {
182
    my $format = lc shift;
182
    my ($format, $format_to_stylesheet_map, $format_info) = @_;
183
    $format = lc $format;
183
184
184
    my $marcflavour = uc(C4::Context->preference('marcflavour'));
185
    my $marcflavour = uc(C4::Context->preference('marcflavour'));
185
    return unless $format_to_stylesheet_map->{$marcflavour}->{$format};
186
    return unless $format_to_stylesheet_map->{$marcflavour}->{$format};
186
- 

Return to bug 10085