View | Details | Raw Unified | Return to bug 8836
Collapse All | Expand All

(-)a/C4/RotatingCollections.pm (-19 / +19 lines)
Lines 22-31 package C4::RotatingCollections; Link Here
22
# with Koha; if not, write to the Free Software Foundation, Inc.,
22
# with Koha; if not, write to the Free Software Foundation, Inc.,
23
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
24
24
25
use strict;
25
use Modern::Perl;
26
#use warnings; FIXME - Bug 2505
27
28
require Exporter;
29
26
30
use C4::Context;
27
use C4::Context;
31
use C4::Circulation;
28
use C4::Circulation;
Lines 47-69 C4::RotatingCollections - Functions for managing rotating collections Link Here
47
44
48
=cut
45
=cut
49
46
50
@ISA = qw( Exporter );
47
BEGIN {
51
@EXPORT = qw( 
48
    require Exporter;
52
  CreateCollection
49
    @ISA    = qw( Exporter );
53
  UpdateCollection
50
    @EXPORT = qw(
54
  DeleteCollection
51
      CreateCollection
55
  
52
      UpdateCollection
56
  GetItemsInCollection
53
      DeleteCollection
57
54
58
  GetCollection
55
      GetItemsInCollection
59
  GetCollections
60
  
61
  AddItemToCollection
62
  RemoveItemFromCollection
63
  TransferCollection  
64
56
65
  GetCollectionItemBranches
57
      GetCollection
66
);
58
      GetCollections
59
60
      AddItemToCollection
61
      RemoveItemFromCollection
62
      TransferCollection
63
64
      GetCollectionItemBranches
65
    );
66
}
67
67
68
=head2  CreateCollection
68
=head2  CreateCollection
69
 ( $success, $errorcode, $errormessage ) = CreateCollection( $title, $description );
69
 ( $success, $errorcode, $errormessage ) = CreateCollection( $title, $description );
(-)a/rotating_collections/addItems.pl (-3 / +1 lines)
Lines 16-24 Link Here
16
# Suite 330, Boston, MA  02111-1307 USA
16
# Suite 330, Boston, MA  02111-1307 USA
17
#
17
#
18
18
19
use strict;
19
use Modern::Perl;
20
#use warnings; FIXME - Bug 2505
21
require Exporter;
22
20
23
use C4::Output;
21
use C4::Output;
24
use C4::Auth;
22
use C4::Auth;
(-)a/rotating_collections/editCollections.pl (-3 / +2 lines)
Lines 15-23 Link Here
15
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
15
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
16
# Suite 330, Boston, MA  02111-1307 USA
16
# Suite 330, Boston, MA  02111-1307 USA
17
#
17
#
18
use strict;
18
19
#use warnings; FIXME - Bug 2505
19
use Modern::Perl;
20
require Exporter;
21
20
22
use CGI;
21
use CGI;
23
22
(-)a/rotating_collections/rotatingCollections.pl (-3 / +1 lines)
Lines 16-24 Link Here
16
# Suite 330, Boston, MA  02111-1307 USA
16
# Suite 330, Boston, MA  02111-1307 USA
17
#
17
#
18
18
19
use strict;
19
use Modern::Perl;
20
#use warnings; FIXME - Bug 2505
21
require Exporter;
22
20
23
use CGI;
21
use CGI;
24
22
(-)a/rotating_collections/transferCollection.pl (-4 / +1 lines)
Lines 16-24 Link Here
16
# Suite 330, Boston, MA  02111-1307 USA
16
# Suite 330, Boston, MA  02111-1307 USA
17
#
17
#
18
18
19
use strict;
19
use Modern::Perl;
20
#use warnings; FIXME - Bug 2505
21
require Exporter;
22
20
23
use C4::Output;
21
use C4::Output;
24
use C4::Auth;
22
use C4::Auth;
25
- 

Return to bug 8836