fixing SQL builded if there is no where_strings

diff --git a/C4/Budgets.pm b/C4/Budgets.pm
index 6ce1174..debb6fa 100644 (file)
--- a/C4/Budgets.pm
+++ b/C4/Budgets.pm
@@ -489,7 +489,7 @@ sub GetBudgetHierarchy {
             push @bind_params, $branchcode;
         }
     }
-       $query.=" WHERE ".join(' AND ', @where_strings);
+       $query.=" WHERE ".join(' AND ', @where_strings) if @where_strings;
        $debug && warn $query,join(",",@bind_params);
        my $sth = $dbh->prepare($query);
        $sth->execute(@bind_params);