From e137254d11c3211a385371c683290f4be0e9b6bd Mon Sep 17 00:00:00 2001 From: David Cook Date: Thu, 6 Aug 2020 12:11:34 +0000 Subject: [PATCH] Bug 25905: Tidy up warns --- Koha/Import/Oaipmh.pm | 3 +++ Koha/REST/V1/Import/Oaipmh/Biblios.pm | 2 -- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/Koha/Import/Oaipmh.pm b/Koha/Import/Oaipmh.pm index 83ae6ca627..fff3e9200e 100644 --- a/Koha/Import/Oaipmh.pm +++ b/Koha/Import/Oaipmh.pm @@ -124,6 +124,7 @@ sub process_metadata { $skipped++; } }; + warn $@ if $@; } elsif ($deleted){ eval { C4::Biblio::DelBiblio($record->biblionumber); @@ -134,6 +135,7 @@ sub process_metadata { #}); $deleted++; }; + warn $@ if $@; } } else { #NOTE: Having metadata and being deleted should be mutually exclusive, @@ -154,6 +156,7 @@ sub process_metadata { })->store; $added++; }; + warn $@ if $@; } } } diff --git a/Koha/REST/V1/Import/Oaipmh/Biblios.pm b/Koha/REST/V1/Import/Oaipmh/Biblios.pm index 1e41f86715..f48607d830 100644 --- a/Koha/REST/V1/Import/Oaipmh/Biblios.pm +++ b/Koha/REST/V1/Import/Oaipmh/Biblios.pm @@ -55,8 +55,6 @@ sub import_biblios { records => $records, frameworkcode => $frameworkcode, }); - use Data::Dumper; - warn Dumper($results); } else { return $c->render( status => 400, openapi => { error => "Records not found." } ); } -- 2.11.0