[Koha-patches] [PATCH] kohabug 2456 Moving certain C4::VirtualShelves.pm subs from EXPORT
Galen Charlton
galen.charlton at liblime.com
Mon Aug 4 17:15:21 CEST 2008
From: Chris Nighswonger <chris.nighswonger at liblime.com>
to EXPORT_OK and correcting associated syntax
Signed-off-by: Galen Charlton <galen.charlton at liblime.com>
---
C4/Auth.pm | 2 +-
C4/VirtualShelves.pm | 20 +++++++++-----------
C4/VirtualShelves/Page.pm | 2 +-
opac/opac-addbybiblionumber.pl | 2 +-
virtualshelves/addbybiblionumber.pl | 2 +-
5 files changed, 13 insertions(+), 15 deletions(-)
diff --git a/C4/Auth.pm b/C4/Auth.pm
index 0d018f2..8bc8572 100755
--- a/C4/Auth.pm
+++ b/C4/Auth.pm
@@ -31,7 +31,7 @@ use C4::Output; # to get the template
use C4::Members;
use C4::Koha;
use C4::Branch; # GetBranches
-use C4::VirtualShelves;
+use C4::VirtualShelves qw/GetRecentShelves/;
# use utf8;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $debug $ldap);
diff --git a/C4/VirtualShelves.pm b/C4/VirtualShelves.pm
index 6238f79..eaebb54 100644
--- a/C4/VirtualShelves.pm
+++ b/C4/VirtualShelves.pm
@@ -36,18 +36,16 @@ BEGIN {
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(
- &GetShelves &GetShelfContents &GetShelf
- &GetRecentShelves &GetShelvesSummary
-
- &AddToShelf &AddToShelfFromBiblio &AddShelf
-
- &SetShelvesLimit
- &RefreshShelvesSummary
-
- &ModShelf
- &ShelfPossibleAction
- &DelFromShelf &DelShelf
+ &GetShelves &GetShelfContents &GetShelf
+ &AddToShelf &AddToShelfFromBiblio &AddShelf
+ &ModShelf
+ &ShelfPossibleAction
+ &DelFromShelf &DelShelf
);
+ @EXPORT_OK = qw(
+ &GetShelvesSummary &GetRecentShelves
+ &RefreshShelvesSummary &SetShelvesLimit
+ );
}
use C4::Auth qw(get_session);
diff --git a/C4/VirtualShelves/Page.pm b/C4/VirtualShelves/Page.pm
index a81f1d0..bcfd3af 100755
--- a/C4/VirtualShelves/Page.pm
+++ b/C4/VirtualShelves/Page.pm
@@ -23,7 +23,7 @@ package C4::VirtualShelves::Page;
use strict;
use warnings;
use CGI;
-use C4::VirtualShelves;
+use C4::VirtualShelves qw/:DEFAULT RefreshShelvesSummary/;
use C4::Biblio;
use C4::Items;
use C4::Koha;
diff --git a/opac/opac-addbybiblionumber.pl b/opac/opac-addbybiblionumber.pl
index 304c2b4..9fe02ee 100755
--- a/opac/opac-addbybiblionumber.pl
+++ b/opac/opac-addbybiblionumber.pl
@@ -25,7 +25,7 @@
use strict;
use C4::Biblio;
use CGI;
-use C4::VirtualShelves;
+use C4::VirtualShelves qw/:DEFAULT GetRecentShelves RefreshShelvesSummary/;
use C4::Auth;
use C4::Output;
use C4::Auth qw/get_session/;
diff --git a/virtualshelves/addbybiblionumber.pl b/virtualshelves/addbybiblionumber.pl
index 4862d02..2c7600b 100755
--- a/virtualshelves/addbybiblionumber.pl
+++ b/virtualshelves/addbybiblionumber.pl
@@ -58,7 +58,7 @@ use strict;
use C4::Biblio;
use CGI;
use C4::Output;
-use C4::VirtualShelves;
+use C4::VirtualShelves qw/:DEFAULT GetRecentShelves/;
use C4::Circulation;
use C4::Auth;
--
1.5.5.GIT
More information about the Koha-patches
mailing list