From 89bb5a06911f7c81f2b892b19d901f18ecf5f7e8 Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Tue, 9 Aug 2022 13:21:05 +0000
Subject: [PATCH] Bug 31319: (QA follow-up) Search items directly (biblio not
 used yet)

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
---
 tags/list.pl | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/tags/list.pl b/tags/list.pl
index b9aec1aa19..9a635ec13e 100755
--- a/tags/list.pl
+++ b/tags/list.pl
@@ -60,8 +60,7 @@ else {
         for ( @{$taglist} ) {
             # FIXME We should use Koha::Biblio here
             my $dat    = &GetBiblioData( $_->{biblionumber} );
-            my $biblio = Koha::Biblios->find($dat->{biblionumber});
-            my $items = $biblio->items->search_ordered;
+            my $items = Koha::Items->search_ordered({ biblionumber => $dat->{biblionumber} });
             $dat->{biblionumber} = $_->{biblionumber};
             $dat->{tag_id}       = $_->{tag_id};
             $dat->{items}        = $items;
-- 
2.30.2