Attachment #12847 for bug #8890

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





use Modern::Perl;

use vars qw($VERSION);

use C4::Context;
use C4::Output;


    # set the version for version checking
    $VERSION = 0.01;
    require Exporter;
    @ISA    = qw(Exporter);
    @EXPORT = qw(

    );

    my $debug = C4::Context->preference("DebugLevel");
}

=head1 NAME
- 

Return to bug 8890

Lines 19-25 package Koha::Borrower::Files; Link Here

(-)a/Koha/Borrower/Files.pm (-9 / +1 lines)
19		19
20	use Modern::Perl;	20	use Modern::Perl;
21		21
22	use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);	22	use vars qw($VERSION);
23		23
24	use C4::Context;	24	use C4::Context;
25	use C4::Output;	25	use C4::Output;
Lines 30-42 BEGIN { Link Here
30		30
31	# set the version for version checking	31	# set the version for version checking
32	$VERSION = 0.01;	32	$VERSION = 0.01;
33	require Exporter;
34	@ISA = qw(Exporter);
35	@EXPORT = qw(
36
37	);
38
39	my $debug = C4::Context->preference("DebugLevel");
40	}	33	}
41		34
42	=head1 NAME	35	=head1 NAME
43	-