From: Alex Arnaud <alex.arnaud@biblibre.com>
Date: Thu, 7 Apr 2011 09:59:22 +0000 (+0200)
Subject: Bug #6082 - On aqbudgets.pl bug on the Statistic's combobox
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=22dc04e24c9af810672ee8f6e313316f3bcc9a59;p=koha.git

Bug #6082 - On aqbudgets.pl bug on the Statistic's combobox

Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
---

diff --git a/C4/Koha.pm b/C4/Koha.pm
index 0836669c71..95244bd91e 100644
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -1051,7 +1051,7 @@ sub GetAuthorisedValueCategories {
     my $sth = $dbh->prepare("SELECT DISTINCT category FROM authorised_values ORDER BY category");
     $sth->execute;
     my @results;
-    while (my $category = $sth->fetchrow_array) {
+    while (defined (my $category  = $sth->fetchrow_array) ) {
         push @results, $category;
     }
     return \@results;