From 93ed21862a667f24159ec51c71f049fec5848d6b Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Tue, 17 Mar 2020 09:53:04 +0100
Subject: [PATCH] Bug 18177: remove aqbooksellers.currency

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
---
 Koha/Acquisition/Bookseller.pm | 1 -
 t/db_dependent/Bookseller.t    | 5 +----
 2 files changed, 1 insertion(+), 5 deletions(-)

diff --git a/Koha/Acquisition/Bookseller.pm b/Koha/Acquisition/Bookseller.pm
index a9683cba0a..26a0a4321f 100644
--- a/Koha/Acquisition/Bookseller.pm
+++ b/Koha/Acquisition/Bookseller.pm
@@ -85,7 +85,6 @@ on the API.
 
 sub to_api_mapping {
     return {
-        currency        => undef,
         listprice       => 'list_currency',
         invoiceprice    => 'invoice_currency',
         gstreg          => 'gst',
diff --git a/t/db_dependent/Bookseller.t b/t/db_dependent/Bookseller.t
index 5ee992cfc4..c0db4fae6c 100644
--- a/t/db_dependent/Bookseller.t
+++ b/t/db_dependent/Bookseller.t
@@ -764,10 +764,7 @@ $schema->storage->txn_rollback();
 sub field_filter {
     my ($struct) = @_;
 
-    for my $field (
-        'currency',        'invoiceprice',
-        'listprice',       'contacts'
-      )
+    for my $field ( qw(invoiceprice listprice contacts) )
     {
 
         if ( grep { /^$field$/ } keys %$struct ) {
-- 
2.39.5