From c0235edf6af1faac388305a03a5c7d1d9f47220b Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Wed, 8 Jun 2016 10:53:25 +0000 Subject: [PATCH] Bug 16493 [QA Followup] - Restore title and author match as an option, make it the default --- acqui/addorderiso2709.pl | 15 ++++++++++----- .../prog/en/modules/acqui/addorderiso2709.tt | 1 + 2 files changed, 11 insertions(+), 5 deletions(-) diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl index 3b79e49..2da834e 100755 --- a/acqui/addorderiso2709.pl +++ b/acqui/addorderiso2709.pl @@ -159,13 +159,18 @@ if ($op eq ""){ # 1st insert the biblio, or find it through matcher unless ( $biblionumber ) { if ($matcher_id) { - my $matcher = C4::Matcher->fetch($matcher_id); - my @matches = $matcher->get_matches( $marcrecord, my $max_matches = 1 ); - if ( @matches ) { - $duplinbatch = $import_batch_id; - next; + if ( $matcher_id eq '_TITLE_AUTHOR_' ) { + $duplinbatch = $import_batch_id if FindDuplicate($marcrecord); } + else { + my $matcher = C4::Matcher->fetch($matcher_id); + my @matches = $matcher->get_matches( $marcrecord, my $max_matches = 1 ); + $duplinbatch = $import_batch_id if @matches; + } + + next if $duplinbatch; } + # add the biblio my $bibitemnum; diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt index 63425a7..acf84e1 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt @@ -198,6 +198,7 @@