From d4c3bbb597f19b5dbdf75227dbd67923bb832d85 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Wed, 2 Nov 2016 08:42:11 +0000
Subject: [PATCH] Bug 15498: Do not display sql csv profiles

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
---
 circ/circulation.pl   | 2 +-
 members/moremember.pl | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/circ/circulation.pl b/circ/circulation.pl
index 75580f63d2..3b4331624c 100755
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -648,7 +648,7 @@ my $patron_image = Koha::Patron::Images->find($borrower->{borrowernumber});
 $template->param( picture => 1 ) if $patron_image;
 
 if ( C4::Context->preference("ExportCircHistory") ) {
-    $template->param(csv_profiles => [ Koha::CsvProfiles->search ]);
+    $template->param(csv_profiles => [ Koha::CsvProfiles->search({ type => 'marc' }) ]);
 }
 
 my $has_modifications = Koha::Patron::Modifications->search( { borrowernumber => $borrowernumber } )->count;
diff --git a/members/moremember.pl b/members/moremember.pl
index 3399b42854..7bea08da0a 100755
--- a/members/moremember.pl
+++ b/members/moremember.pl
@@ -325,7 +325,7 @@ if (C4::Context->preference('EnhancedMessagingPreferences')) {
 }
 
 if ( C4::Context->preference("ExportCircHistory") ) {
-    $template->param(csv_profiles => [ Koha::CsvProfiles->search ]);
+    $template->param(csv_profiles => [ Koha::CsvProfiles->search({ type => 'marc' }) ]);
 }
 
 # in template <TMPL_IF name="I"> => instutitional (A for Adult, C for children)
-- 
2.39.5