---
C4/Bookseller.pm | 2 ++
1 files changed, 2 insertions(+), 0 deletions(-)
diff --git a/C4/Bookseller.pm b/C4/Bookseller.pm
index 332d3bc..e19378e 100644
--- a/C4/Bookseller.pm
+++ b/C4/Bookseller.pm
@@ -24,6 +24,7 @@ use vars qw($VERSION @ISA @EXPORT);
BEGIN {
# set the version for version checking
$VERSION = 3.01;
+ require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(
&GetBookSeller &GetBooksellersWithLateOrders
&GetBookSellerFromId
@@ -195,6 +196,7 @@ sub AddBookseller {
);
# return the id of this new supplier
+ # FIXME: no protection against simultaneous addition: max(id) might be
wrong!
$query = "
SELECT max(id)
FROM aqbooksellers
--
1.5.5.GIT
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches
