From 159f1b6293360067a5973ec5b9df5ca8b5257d17 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Mon, 7 Jan 2008 13:53:07 -0600 Subject: [PATCH] Reserves.pm - BEGIN block VERSION and vars related to export. Signed-off-by: Chris Cormack Signed-off-by: Joshua Ferraro --- C4/Reserves.pm | 73 +++++++++++++++++++++----------------------------- 1 file changed, 30 insertions(+), 43 deletions(-) diff --git a/C4/Reserves.pm b/C4/Reserves.pm index 689fbeca6a..df06370091 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -24,7 +24,6 @@ package C4::Reserves; use strict; -require Exporter; use C4::Context; use C4::Biblio; use C4::Items; @@ -32,26 +31,10 @@ use C4::Search; use C4::Circulation; use C4::Accounts; -INIT { - # an ugly hack to ensure that - # various subs get imported - # into C4::Reserves' symbol table - # FIXME: hopefully can remove once - # we get a better idea of exactly - # how Exporter/use/require/import - # should be used with modules - # that currently call functions - # from each other. - import C4::Items; -} - -our ($VERSION,@ISA,@EXPORT,@EXPORT_OK,%EXPORT_TAGS); +use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); my $library_name = C4::Context->preference("LibraryName"); -# set the version for version checking -$VERSION = 3.00; - =head1 NAME C4::Reserves - Koha functions for dealing with reservation. @@ -96,32 +79,35 @@ C4::Reserves - Koha functions for dealing with reservation. =cut -@ISA = qw(Exporter); - -@EXPORT = qw( - &AddReserve - - &GetReservesFromItemnumber - &GetReservesFromBiblionumber - &GetReservesFromBorrowernumber - &GetReservesForBranch - &GetReservesToBranch - &GetReserveCount - &GetReserveFee - - &GetOtherReserves +BEGIN { + # set the version for version checking + $VERSION = 3.01; + require Exporter; + @ISA = qw(Exporter); + @EXPORT = qw( + &AddReserve - &ModReserveFill - &ModReserveAffect - &ModReserve - &ModReserveStatus - &ModReserveCancelAll - &ModReserveMinusPriority - - &CheckReserves - &CancelReserve -); - + &GetReservesFromItemnumber + &GetReservesFromBiblionumber + &GetReservesFromBorrowernumber + &GetReservesForBranch + &GetReservesToBranch + &GetReserveCount + &GetReserveFee + + &GetOtherReserves + + &ModReserveFill + &ModReserveAffect + &ModReserve + &ModReserveStatus + &ModReserveCancelAll + &ModReserveMinusPriority + + &CheckReserves + &CancelReserve + ); +} =item AddReserve @@ -1167,3 +1153,4 @@ Koha Developement team =cut +1; -- 2.39.5