return undef or empty array in error cases
hopefully if we're consistent someone may start checking it
removed unnecessary ()s
---
 C4/Bookseller.pm |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/C4/Bookseller.pm b/C4/Bookseller.pm
index 655d25e..63df90d 100644
--- a/C4/Bookseller.pm
+++ b/C4/Bookseller.pm
@@ -87,7 +87,7 @@ sub GetBookSeller($) {
 
 
 sub GetBookSellerFromId($) {
-       my ($id) = shift or return undef;
+       my $id = shift or return;
        my $dbh = C4::Context->dbh();
        my $query = "SELECT * FROM aqbooksellers WHERE id = ?";
        my $sth =$dbh->prepare($query);
@@ -96,9 +96,9 @@ sub GetBookSellerFromId($) {
                my $sth2 = $dbh->prepare("SELECT count(*) FROM aqbasket WHERE 
booksellerid=?");
                $sth2->execute($id);
                $data->{basketcount}=$sth2->fetchrow();
-               return ($data);
+               return $data;
        }
-       return 0;
+       return;
 }
 #-----------------------------------------------------------------#
 
-- 
1.6.6

_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches

Reply via email to