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

(-)a/Koha/Import/Oaipmh.pm (+3 lines)
Lines 124-129 sub process_metadata { Link Here
124
                                            $skipped++;
124
                                            $skipped++;
125
                                        }
125
                                        }
126
                                    };
126
                                    };
127
                                    warn $@ if $@;
127
                                } elsif ($deleted){
128
                                } elsif ($deleted){
128
                                    eval {
129
                                    eval {
129
                                        C4::Biblio::DelBiblio($record->biblionumber);
130
                                        C4::Biblio::DelBiblio($record->biblionumber);
Lines 134-139 sub process_metadata { Link Here
134
                                        #});
135
                                        #});
135
                                        $deleted++;
136
                                        $deleted++;
136
                                    };
137
                                    };
138
                                    warn $@ if $@;
137
                                }
139
                                }
138
                            } else {
140
                            } else {
139
                                #NOTE: Having metadata and being deleted should be mutually exclusive,
141
                                #NOTE: Having metadata and being deleted should be mutually exclusive,
Lines 154-159 sub process_metadata { Link Here
154
                                        })->store;
156
                                        })->store;
155
                                        $added++;
157
                                        $added++;
156
                                    };
158
                                    };
159
                                    warn $@ if $@;
157
                                }
160
                                }
158
                            }
161
                            }
159
                        }
162
                        }
(-)a/Koha/REST/V1/Import/Oaipmh/Biblios.pm (-3 lines)
Lines 55-62 sub import_biblios { Link Here
55
            records => $records,
55
            records => $records,
56
            frameworkcode => $frameworkcode,
56
            frameworkcode => $frameworkcode,
57
        });
57
        });
58
        use Data::Dumper;
59
        warn Dumper($results);
60
    } else {
58
    } else {
61
        return $c->render( status => 400, openapi => { error => "Records not found." } );
59
        return $c->render( status => 400, openapi => { error => "Records not found." } );
62
    }
60
    }
63
- 

Return to bug 25905