From dd2b3115212255aad01b6cfec3db9a071b8e5b2c 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
Content-Type: text/plain; charset=utf-8

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

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
---
 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 75580f6..3b43316 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 b5b6f4e..3a054dd 100755
--- a/members/moremember.pl
+++ b/members/moremember.pl
@@ -328,7 +328,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.1.4