From 5f2ed4c0378eb27188eda422b6f526717f6b44ce Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Wed, 4 Jan 2017 15:41:22 +0100
Subject: [PATCH] Bug 17847: Remove C4::Koha::GetAuthvalueDropbox
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>
---
 C4/Koha.pm | 38 --------------------------------------
 1 file changed, 38 deletions(-)

diff --git a/C4/Koha.pm b/C4/Koha.pm
index 9f06226..810e6a4 100644
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -900,44 +900,6 @@ sub GetNormalizedOCLCNumber {
     return
 }
 
-sub GetAuthvalueDropbox {
-    my ( $authcat, $default ) = @_;
-    my $branch_limit = C4::Context->userenv ? C4::Context->userenv->{"branch"} : "";
-    my $dbh = C4::Context->dbh;
-
-    my $query = qq{
-        SELECT *
-        FROM authorised_values
-    };
-    $query .= qq{
-          LEFT JOIN authorised_values_branches ON ( id = av_id )
-    } if $branch_limit;
-    $query .= qq{
-        WHERE category = ?
-    };
-    $query .= " AND ( branchcode = ? OR branchcode IS NULL )" if $branch_limit;
-    $query .= " GROUP BY lib ORDER BY category, lib, lib_opac";
-    my $sth = $dbh->prepare($query);
-    $sth->execute( $authcat, $branch_limit ? $branch_limit : () );
-
-
-    my $option_list = [];
-    my @authorised_values = ( q{} );
-    while (my $av = $sth->fetchrow_hashref) {
-        push @{$option_list}, {
-            value => $av->{authorised_value},
-            label => $av->{lib},
-            default => ($default eq $av->{authorised_value}),
-        };
-    }
-
-    if ( @{$option_list} ) {
-        return $option_list;
-    }
-    return;
-}
-
-
 =head2 GetDailyQuote($opts)
 
 Takes a hashref of options
-- 
2.1.4