From 84f5ae669c36e10ec28d8015197a6450fe11eac8 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Fri, 29 Jun 2018 10:29:30 -0300 Subject: [PATCH] Bug 21018: Fix TrackClicks for 952$u Caused by commit 51b6cf2aafbfb45b9fcb072403b986fe3c2add53 Bug 19847: Track links within the records and 404 for others We should also accept uri stored in items.uri (952$u) Test plan: - Turn on TrackClicks - Defined uri for some items - At the OPAC click on the link (from opac-detail.pl) => Without this patch you will get 404 (redirected from tracklinks.pl) => With this patch applied you will be redirected correctly and the linktracker will be filled correctly Signed-off-by: Katrin Fischer Signed-off-by: Katrin Fischer Signed-off-by: Martin Renvoize Signed-off-by: Nick Clemens (cherry picked from commit d14ed73744fa23d4ed649da6d847f4b37cdfce92) Signed-off-by: Martin Renvoize (cherry picked from commit 20bfb6730f3d93d388a538871b94e83d867ac796) Signed-off-by: Fridolin Somers --- opac/tracklinks.pl | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/opac/tracklinks.pl b/opac/tracklinks.pl index b5743fe699..bc1d54015c 100755 --- a/opac/tracklinks.pl +++ b/opac/tracklinks.pl @@ -22,6 +22,7 @@ use Modern::Perl; use C4::Context; use C4::Auth qw(checkauth); use C4::Biblio; +use Koha::Items; use Koha::Linktracker; use CGI qw ( -utf8 ); @@ -57,7 +58,9 @@ if ($uri) { my $record = C4::Biblio::GetMarcBiblio({ biblionumber => $biblionumber }); my $marc_urls = C4::Biblio::GetMarcUrls($record, C4::Context->preference('marcflavour')); - if ( grep { $_ eq $uri } map { $_->{MARCURL} } @$marc_urls ) { + if ( ( grep { $_ eq $uri } map { $_->{MARCURL} } @$marc_urls ) + || Koha::Items->search( { uri => $uri } )->count ) + { $tracker->trackclick( { uri => $uri, -- 2.39.5