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;