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

(-)a/C4/Accounts.pm (-1 lines)
Lines 31-37 use Data::Dumper qw(Dumper); Link Here
31
use vars qw(@ISA @EXPORT);
31
use vars qw(@ISA @EXPORT);
32
32
33
BEGIN {
33
BEGIN {
34
	# set the version for version checking
35
	require Exporter;
34
	require Exporter;
36
	@ISA    = qw(Exporter);
35
	@ISA    = qw(Exporter);
37
	@EXPORT = qw(
36
	@EXPORT = qw(
(-)a/C4/Acquisition.pm (-1 lines)
Lines 44-50 use HTML::Entities; Link Here
44
use vars qw(@ISA @EXPORT);
44
use vars qw(@ISA @EXPORT);
45
45
46
BEGIN {
46
BEGIN {
47
    # set the version for version checking
48
    require Exporter;
47
    require Exporter;
49
    @ISA    = qw(Exporter);
48
    @ISA    = qw(Exporter);
50
    @EXPORT = qw(
49
    @EXPORT = qw(
(-)a/C4/AuthoritiesMarc.pm (-1 lines)
Lines 33-39 use Koha::Authority::Types; Link Here
33
use vars qw(@ISA @EXPORT);
33
use vars qw(@ISA @EXPORT);
34
34
35
BEGIN {
35
BEGIN {
36
	# set the version for version checking
37
36
38
	require Exporter;
37
	require Exporter;
39
	@ISA = qw(Exporter);
38
	@ISA = qw(Exporter);
(-)a/C4/BackgroundJob.pm (-1 lines)
Lines 27-33 use Digest::MD5; Link Here
27
use vars qw();
27
use vars qw();
28
28
29
BEGIN {
29
BEGIN {
30
	# set the version for version checking
31
}
30
}
32
31
33
=head1 NAME
32
=head1 NAME
(-)a/C4/Bookseller.pm (-1 lines)
Lines 25-31 use base qw( Exporter ); Link Here
25
25
26
use C4::Bookseller::Contact;
26
use C4::Bookseller::Contact;
27
27
28
# set the version for version checking
29
our @EXPORT_OK = qw(
28
our @EXPORT_OK = qw(
30
  GetBooksellersWithLateOrders
29
  GetBooksellersWithLateOrders
31
  ModBookseller
30
  ModBookseller
(-)a/C4/Branch.pm (-1 lines)
Lines 25-31 use Koha::LibraryCategories; Link Here
25
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
25
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
26
26
27
BEGIN {
27
BEGIN {
28
	# set the version for version checking
29
	@ISA    = qw(Exporter);
28
	@ISA    = qw(Exporter);
30
	@EXPORT = qw(
29
	@EXPORT = qw(
31
		&GetBranchName
30
		&GetBranchName
(-)a/C4/Breeding.pm (-1 lines)
Lines 34-40 use Koha::XSLT_Handler; Link Here
34
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
34
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
35
35
36
BEGIN {
36
BEGIN {
37
	# set the version for version checking
38
	require Exporter;
37
	require Exporter;
39
	@ISA = qw(Exporter);
38
	@ISA = qw(Exporter);
40
    @EXPORT = qw(&BreedingSearch &Z3950Search &Z3950SearchAuth);
39
    @EXPORT = qw(&BreedingSearch &Z3950Search &Z3950SearchAuth);
(-)a/C4/Budgets.pm (-1 lines)
Lines 25-31 use C4::Debug; Link Here
25
use vars qw(@ISA @EXPORT);
25
use vars qw(@ISA @EXPORT);
26
26
27
BEGIN {
27
BEGIN {
28
	# set the version for version checking
29
	require Exporter;
28
	require Exporter;
30
	@ISA    = qw(Exporter);
29
	@ISA    = qw(Exporter);
31
	@EXPORT = qw(
30
	@EXPORT = qw(
(-)a/C4/Charset.pm (-1 lines)
Lines 29-35 use Encode qw( decode encode is_utf8 ); Link Here
29
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
29
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
30
30
31
BEGIN {
31
BEGIN {
32
    # set the version for version checking
33
    require Exporter;
32
    require Exporter;
34
    @ISA    = qw(Exporter);
33
    @ISA    = qw(Exporter);
35
    @EXPORT = qw(
34
    @EXPORT = qw(
(-)a/C4/ClassSortRoutine.pm (-1 lines)
Lines 26-32 use C4::Context; Link Here
26
26
27
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
27
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
28
28
29
# set the version for version checking
30
29
31
=head1 NAME 
30
=head1 NAME 
32
31
(-)a/C4/ClassSortRoutine/Dewey.pm (-1 lines)
Lines 22-28 use warnings; Link Here
22
22
23
use vars qw();
23
use vars qw();
24
24
25
# set the version for version checking
26
25
27
=head1 NAME 
26
=head1 NAME 
28
27
(-)a/C4/ClassSortRoutine/Generic.pm (-1 lines)
Lines 22-28 use warnings; Link Here
22
22
23
use vars qw();
23
use vars qw();
24
24
25
# set the version for version checking
26
25
27
=head1 NAME 
26
=head1 NAME 
28
27
(-)a/C4/ClassSortRoutine/LCC.pm (-1 lines)
Lines 24-30 use Library::CallNumber::LC; Link Here
24
24
25
use vars qw();
25
use vars qw();
26
26
27
# set the version for version checking
28
27
29
=head1 NAME 
28
=head1 NAME 
30
29
(-)a/C4/ClassSource.pm (-1 lines)
Lines 26-32 use C4::ClassSortRoutine; Link Here
26
26
27
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
27
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
28
28
29
# set the version for version checking
30
29
31
=head1 NAME
30
=head1 NAME
32
31
(-)a/C4/Contract.pm (-1 lines)
Lines 26-32 use Koha::Database; Link Here
26
use vars qw(@ISA @EXPORT);
26
use vars qw(@ISA @EXPORT);
27
27
28
BEGIN {
28
BEGIN {
29
	# set the version for version checking
30
    require Exporter;
29
    require Exporter;
31
	@ISA    = qw(Exporter);
30
	@ISA    = qw(Exporter);
32
	@EXPORT = qw(
31
	@EXPORT = qw(
(-)a/C4/Csv.pm (-1 lines)
Lines 25-31 package C4::Csv; Link Here
25
use C4::Context;
25
use C4::Context;
26
use vars qw(@ISA @EXPORT);
26
use vars qw(@ISA @EXPORT);
27
27
28
# set the version for version checking
29
28
30
@ISA = qw(Exporter);
29
@ISA = qw(Exporter);
31
30
(-)a/C4/Images.pm (-1 lines)
Lines 29-35 use vars qw($debug $noimage @ISA @EXPORT); Link Here
29
29
30
BEGIN {
30
BEGIN {
31
31
32
    # set the version for version checking
33
    require Exporter;
32
    require Exporter;
34
    @ISA    = qw(Exporter);
33
    @ISA    = qw(Exporter);
35
    @EXPORT = qw(
34
    @EXPORT = qw(
(-)a/C4/ImportBatch.pm (-1 lines)
Lines 33-39 use Koha::Logger; Link Here
33
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
33
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
34
34
35
BEGIN {
35
BEGIN {
36
	# set the version for version checking
37
	require Exporter;
36
	require Exporter;
38
	@ISA    = qw(Exporter);
37
	@ISA    = qw(Exporter);
39
	@EXPORT = qw(
38
	@EXPORT = qw(
(-)a/C4/InstallAuth.pm (-1 lines)
Lines 30-36 use CGI::Session; Link Here
30
30
31
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
31
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
32
32
33
# set the version for version checking
34
33
35
=head1 NAME
34
=head1 NAME
36
35
(-)a/C4/Letters.pm (-1 lines)
Lines 43-49 use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); Link Here
43
43
44
BEGIN {
44
BEGIN {
45
    require Exporter;
45
    require Exporter;
46
    # set the version for version checking
47
    @ISA = qw(Exporter);
46
    @ISA = qw(Exporter);
48
    @EXPORT = qw(
47
    @EXPORT = qw(
49
        &GetLetters &GetLettersAvailableForALibrary &GetLetterTemplates &DelLetter &GetPreparedLetter &GetWrappedLetter &addalert &getalert &delalert &findrelatedto &SendAlerts &GetPrintMessages &GetMessageTransportTypes
48
        &GetLetters &GetLettersAvailableForALibrary &GetLetterTemplates &DelLetter &GetPreparedLetter &GetWrappedLetter &addalert &getalert &delalert &findrelatedto &SendAlerts &GetPrintMessages &GetMessageTransportTypes
(-)a/C4/Log.pm (-1 lines)
Lines 30-36 use Koha::DateUtils; Link Here
30
use vars qw(@ISA @EXPORT);
30
use vars qw(@ISA @EXPORT);
31
31
32
BEGIN {
32
BEGIN {
33
    # set the version for version checking
34
        require Exporter;
33
        require Exporter;
35
        @ISA = qw(Exporter);
34
        @ISA = qw(Exporter);
36
        @EXPORT = qw(&logaction &cronlogaction &GetLogStatus &displaylog &GetLogs);
35
        @EXPORT = qw(&logaction &cronlogaction &GetLogStatus &displaylog &GetLogs);
(-)a/C4/Matcher.pm (-1 lines)
Lines 26-32 use MARC::Record; Link Here
26
use vars qw();
26
use vars qw();
27
27
28
BEGIN {
28
BEGIN {
29
	# set the version for version checking
30
}
29
}
31
30
32
=head1 NAME
31
=head1 NAME
(-)a/C4/Members.pm (-1 / +1 lines)
Lines 41-47 use Text::Unaccent qw( unac_string ); Link Here
41
use Koha::AuthUtils qw(hash_password);
41
use Koha::AuthUtils qw(hash_password);
42
use Koha::Database;
42
use Koha::Database;
43
43
44
our ($VERSION,@ISA,@EXPORT,@EXPORT_OK,$debug);
44
our (@ISA,@EXPORT,@EXPORT_OK,$debug);
45
45
46
use Module::Load::Conditional qw( can_load );
46
use Module::Load::Conditional qw( can_load );
47
if ( ! can_load( modules => { 'Koha::NorwegianPatronDB' => undef } ) ) {
47
if ( ! can_load( modules => { 'Koha::NorwegianPatronDB' => undef } ) ) {
(-)a/C4/Members/AttributeTypes.pm (-1 lines)
Lines 24-30 use C4::Context; Link Here
24
use vars qw();
24
use vars qw();
25
25
26
BEGIN {
26
BEGIN {
27
    # set the version for version checking
28
}
27
}
29
28
30
=head1 NAME
29
=head1 NAME
(-)a/C4/Members/Attributes.pm (-1 lines)
Lines 28-34 use vars qw(@ISA @EXPORT_OK @EXPORT %EXPORT_TAGS); Link Here
28
our ($csv, $AttributeTypes);
28
our ($csv, $AttributeTypes);
29
29
30
BEGIN {
30
BEGIN {
31
    # set the version for version checking
32
    @ISA = qw(Exporter);
31
    @ISA = qw(Exporter);
33
    @EXPORT_OK = qw(GetBorrowerAttributes GetBorrowerAttributeValue CheckUniqueness SetBorrowerAttributes
32
    @EXPORT_OK = qw(GetBorrowerAttributes GetBorrowerAttributeValue CheckUniqueness SetBorrowerAttributes
34
                    DeleteBorrowerAttribute UpdateBorrowerAttribute
33
                    DeleteBorrowerAttribute UpdateBorrowerAttribute
(-)a/C4/Members/Messaging.pm (-1 lines)
Lines 24-30 use C4::Context; Link Here
24
use vars qw();
24
use vars qw();
25
25
26
BEGIN {
26
BEGIN {
27
    # set the version for version checking
28
}
27
}
29
28
30
=head1 NAME
29
=head1 NAME
(-)a/C4/Output.pm (-1 lines)
Lines 36-42 use C4::Templates; Link Here
36
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
36
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
37
37
38
BEGIN {
38
BEGIN {
39
    # set the version for version checking
40
    require Exporter;
39
    require Exporter;
41
40
42
 @ISA    = qw(Exporter);
41
 @ISA    = qw(Exporter);
(-)a/C4/Overdues.pm (-1 lines)
Lines 40-46 use Koha::Account::Lines; Link Here
40
use vars qw(@ISA @EXPORT);
40
use vars qw(@ISA @EXPORT);
41
41
42
BEGIN {
42
BEGIN {
43
    # set the version for version checking
44
    require Exporter;
43
    require Exporter;
45
    @ISA = qw(Exporter);
44
    @ISA = qw(Exporter);
46
45
(-)a/C4/Passwordrecovery.pm (-1 lines)
Lines 24-30 use Crypt::Eksblowfish::Bcrypt qw(en_base64); Link Here
24
use vars qw(@ISA @EXPORT);
24
use vars qw(@ISA @EXPORT);
25
25
26
BEGIN {
26
BEGIN {
27
    # set the version for version checking
28
    require Exporter;
27
    require Exporter;
29
    @ISA = qw(Exporter);
28
    @ISA = qw(Exporter);
30
    push @EXPORT, qw(
29
    push @EXPORT, qw(
(-)a/C4/Print.pm (-1 lines)
Lines 24-30 use C4::Context; Link Here
24
use vars qw(@ISA @EXPORT);
24
use vars qw(@ISA @EXPORT);
25
25
26
BEGIN {
26
BEGIN {
27
	# set the version for version checking
28
	require Exporter;
27
	require Exporter;
29
	@ISA    = qw(Exporter);
28
	@ISA    = qw(Exporter);
30
    @EXPORT = qw(&NetworkPrint);
29
    @EXPORT = qw(&NetworkPrint);
(-)a/C4/Record.pm (-1 lines)
Lines 41-47 use Carp; Link Here
41
41
42
use vars qw(@ISA @EXPORT);
42
use vars qw(@ISA @EXPORT);
43
43
44
# set the version for version checking
45
44
46
@ISA = qw(Exporter);
45
@ISA = qw(Exporter);
47
46
(-)a/C4/Reports.pm (-1 lines)
Lines 26-32 use C4::Context; Link Here
26
use C4::Debug;
26
use C4::Debug;
27
27
28
BEGIN {
28
BEGIN {
29
    # set the version for version checking
30
    require Exporter;
29
    require Exporter;
31
    @ISA = qw(Exporter);
30
    @ISA = qw(Exporter);
32
    @EXPORT = qw(
31
    @EXPORT = qw(
(-)a/C4/Reports/Guided.pm (-1 lines)
Lines 37-43 use C4::Log; Link Here
37
use Koha::AuthorisedValues;
37
use Koha::AuthorisedValues;
38
38
39
BEGIN {
39
BEGIN {
40
    # set the version for version checking
41
    require Exporter;
40
    require Exporter;
42
    @ISA    = qw(Exporter);
41
    @ISA    = qw(Exporter);
43
    @EXPORT = qw(
42
    @EXPORT = qw(
(-)a/C4/Reserves.pm (-1 lines)
Lines 91-97 This modules provides somes functions to deal with reservations. Link Here
91
=cut
91
=cut
92
92
93
BEGIN {
93
BEGIN {
94
    # set the version for version checking
95
    require Exporter;
94
    require Exporter;
96
    @ISA = qw(Exporter);
95
    @ISA = qw(Exporter);
97
    @EXPORT = qw(
96
    @EXPORT = qw(
(-)a/C4/Review.pm (-1 lines)
Lines 25-31 use C4::Context; Link Here
25
use vars qw(@ISA @EXPORT);
25
use vars qw(@ISA @EXPORT);
26
26
27
BEGIN {
27
BEGIN {
28
    # set the version for version checking
29
    require Exporter;
28
    require Exporter;
30
    @ISA    = qw(Exporter);
29
    @ISA    = qw(Exporter);
31
    @EXPORT = qw(getreview savereview updatereview numberofreviews numberofreviewsbybiblionumber
30
    @EXPORT = qw(getreview savereview updatereview numberofreviews numberofreviewsbybiblionumber
(-)a/C4/Ris.pm (-1 lines)
Lines 67-73 use vars qw(@ISA @EXPORT); Link Here
67
use C4::Biblio qw(GetMarcSubfieldStructureFromKohaField);
67
use C4::Biblio qw(GetMarcSubfieldStructureFromKohaField);
68
use Koha::SimpleMARC qw(read_field);
68
use Koha::SimpleMARC qw(read_field);
69
69
70
# set the version for version checking
71
70
72
@ISA = qw(Exporter);
71
@ISA = qw(Exporter);
73
72
(-)a/C4/RotatingCollections.pm (-1 lines)
Lines 35-41 use Data::Dumper; Link Here
35
35
36
use vars qw(@ISA @EXPORT);
36
use vars qw(@ISA @EXPORT);
37
37
38
# set the version for version checking
39
38
40
=head1 NAME
39
=head1 NAME
41
40
(-)a/C4/Scheduler.pm (-1 lines)
Lines 25-31 use C4::Context; Link Here
25
use Schedule::At;
25
use Schedule::At;
26
26
27
BEGIN {
27
BEGIN {
28
	# set the version for version checking
29
	require Exporter;
28
	require Exporter;
30
	@ISA = qw(Exporter);
29
	@ISA = qw(Exporter);
31
	@EXPORT =
30
	@EXPORT =
(-)a/C4/Search.pm (-1 lines)
Lines 39-45 use MARC::Record; Link Here
39
use MARC::Field;
39
use MARC::Field;
40
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG);
40
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG);
41
41
42
# set the version for version checking
43
BEGIN {
42
BEGIN {
44
    $DEBUG = ($ENV{DEBUG}) ? 1 : 0;
43
    $DEBUG = ($ENV{DEBUG}) ? 1 : 0;
45
}
44
}
(-)a/C4/Serials/Frequency.pm (-1 lines)
Lines 25-31 use C4::Context; Link Here
25
use vars qw(@ISA @EXPORT);
25
use vars qw(@ISA @EXPORT);
26
26
27
BEGIN {
27
BEGIN {
28
    # set the version for version checking
29
    require Exporter;
28
    require Exporter;
30
    @ISA    = qw(Exporter);
29
    @ISA    = qw(Exporter);
31
    @EXPORT = qw(
30
    @EXPORT = qw(
(-)a/C4/Serials/Numberpattern.pm (-1 lines)
Lines 26-32 use vars qw(@ISA @EXPORT); Link Here
26
26
27
BEGIN {
27
BEGIN {
28
28
29
    # set the version for version checking
30
    require Exporter;
29
    require Exporter;
31
    @ISA    = qw(Exporter);
30
    @ISA    = qw(Exporter);
32
    @EXPORT = qw(
31
    @EXPORT = qw(
(-)a/C4/Stats.pm (-1 lines)
Lines 29-35 use vars qw(@ISA @EXPORT); Link Here
29
our $debug;
29
our $debug;
30
30
31
BEGIN {
31
BEGIN {
32
	# set the version for version checking
33
	@ISA    = qw(Exporter);
32
	@ISA    = qw(Exporter);
34
	@EXPORT = qw(
33
	@EXPORT = qw(
35
		&UpdateStats
34
		&UpdateStats
(-)a/Koha/Calendar.pm (-4 lines)
Lines 381-390 __END__ Link Here
381
381
382
Koha::Calendar - Object containing a branches calendar
382
Koha::Calendar - Object containing a branches calendar
383
383
384
=head1 VERSION
385
386
This documentation refers to Koha::Calendar version 0.0.1
387
388
=head1 SYNOPSIS
384
=head1 SYNOPSIS
389
385
390
  use Koha::Calendar
386
  use Koha::Calendar
(-)a/Koha/DateUtils.pm (-1 lines)
Lines 22-28 use C4::Context; Link Here
22
use Carp;
22
use Carp;
23
23
24
use base 'Exporter';
24
use base 'Exporter';
25
use version; our $VERSION = qv('1.0.0');
26
25
27
our @EXPORT = (
26
our @EXPORT = (
28
    qw( dt_from_string output_pref format_sqldatetime )
27
    qw( dt_from_string output_pref format_sqldatetime )
(-)a/Koha/NorwegianPatronDB.pm (-1 lines)
Lines 61-67 use Convert::BaseN; Link Here
61
use DateTime;
61
use DateTime;
62
62
63
use base 'Exporter';
63
use base 'Exporter';
64
use version; our $VERSION = qv('1.0.0');
65
64
66
our %EXPORT_TAGS = ( all => [qw(
65
our %EXPORT_TAGS = ( all => [qw(
67
        NLCheckSysprefs
66
        NLCheckSysprefs
(-)a/Koha/Patron/Files.pm (-1 lines)
Lines 27-33 use C4::Debug; Link Here
27
27
28
BEGIN {
28
BEGIN {
29
29
30
    # set the version for version checking
31
}
30
}
32
31
33
=head1 NAME
32
=head1 NAME
(-)a/acqui/pdfformat/layout2pages.pm (-2 / +1 lines)
Lines 34-41 use Koha::Libraries; Link Here
34
34
35
BEGIN {
35
BEGIN {
36
         use Exporter   ();
36
         use Exporter   ();
37
         our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
37
         our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
38
	# set the version for version checking
39
	@ISA    = qw(Exporter);
38
	@ISA    = qw(Exporter);
40
	@EXPORT = qw(printpdf);
39
	@EXPORT = qw(printpdf);
41
}
40
}
(-)a/acqui/pdfformat/layout2pagesde.pm (-2 / +1 lines)
Lines 34-41 use Koha::Libraries; Link Here
34
34
35
BEGIN {
35
BEGIN {
36
         use Exporter   ();
36
         use Exporter   ();
37
         our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
37
         our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
38
	# set the version for version checking
39
	@ISA    = qw(Exporter);
38
	@ISA    = qw(Exporter);
40
	@EXPORT = qw(printpdf);
39
	@EXPORT = qw(printpdf);
41
}
40
}
(-)a/acqui/pdfformat/layout3pages.pm (-2 / +1 lines)
Lines 37-44 use Koha::Libraries; Link Here
37
37
38
BEGIN {
38
BEGIN {
39
         use Exporter   ();
39
         use Exporter   ();
40
         our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
40
         our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
41
	# set the version for version checking
42
	@ISA    = qw(Exporter);
41
	@ISA    = qw(Exporter);
43
	@EXPORT = qw(printpdf);
42
	@EXPORT = qw(printpdf);
44
}
43
}
(-)a/acqui/pdfformat/layout3pagesfr.pm (-2 / +1 lines)
Lines 36-43 use Koha::Libraries; Link Here
36
36
37
BEGIN {
37
BEGIN {
38
         use Exporter   ();
38
         use Exporter   ();
39
         our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
39
         our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
40
         # set the version for version checking
41
         @ISA    = qw(Exporter);
40
         @ISA    = qw(Exporter);
42
         @EXPORT = qw(printpdf);
41
         @EXPORT = qw(printpdf);
43
}
42
}
(-)a/installer/data/mysql/backfill_statistics.pl (-2 / +1 lines)
Lines 16-24 use C4::Items; Link Here
16
use C4::Debug;
16
use C4::Debug;
17
use Data::Dumper;
17
use Data::Dumper;
18
18
19
use vars qw($debug $dbh $VERSION);
19
use vars qw($debug $dbh);
20
$dbh = C4::Context->dbh;
20
$dbh = C4::Context->dbh;
21
$VERSION = "1.00";
22
21
23
sub get_counts() {
22
sub get_counts() {
24
	my $query = q(
23
	my $query = q(
(-)a/misc/cronjobs/MARC21_parse_test.pl (-3 lines)
Lines 34-47 use C4::Charset; Link Here
34
use C4::Context;
34
use C4::Context;
35
use C4::Debug;
35
use C4::Debug;
36
36
37
use vars qw($VERSION);
38
39
BEGIN {
37
BEGIN {
40
    # find Koha's Perl modules
38
    # find Koha's Perl modules
41
    # test carefully before changing this
39
    # test carefully before changing this
42
    use FindBin;
40
    use FindBin;
43
    eval { require "$FindBin::Bin/../kohalib.pl" };
41
    eval { require "$FindBin::Bin/../kohalib.pl" };
44
    $VERSION = 0.03;
45
}
42
}
46
43
47
our $debug;
44
our $debug;
(-)a/misc/cronjobs/runreport.pl (-3 lines)
Lines 35-48 use CGI qw ( -utf8 ); Link Here
35
use Carp;
35
use Carp;
36
use Encode;
36
use Encode;
37
37
38
use vars qw($VERSION);
39
40
BEGIN {
38
BEGIN {
41
    # find Koha's Perl modules
39
    # find Koha's Perl modules
42
    # test carefully before changing this
40
    # test carefully before changing this
43
    use FindBin;
41
    use FindBin;
44
    eval { require "$FindBin::Bin/../kohalib.pl" };
42
    eval { require "$FindBin::Bin/../kohalib.pl" };
45
    $VERSION = 0.22;
46
}
43
}
47
44
48
=head1 NAME
45
=head1 NAME
(-)a/misc/maintenance/MARC21_utf8_flag_fix.pl (-4 lines)
Lines 30-43 use C4::Charset; Link Here
30
use C4::Context;
30
use C4::Context;
31
use C4::Debug;
31
use C4::Debug;
32
32
33
use vars qw($VERSION);
34
35
BEGIN {
33
BEGIN {
36
    # find Koha's Perl modules
34
    # find Koha's Perl modules
37
    # test carefully before changing this
35
    # test carefully before changing this
38
    use FindBin;
36
    use FindBin;
39
    eval { require "$FindBin::Bin/../kohalib.pl" };
37
    eval { require "$FindBin::Bin/../kohalib.pl" };
40
    $VERSION = 0.02;
41
}
38
}
42
39
43
our $debug;
40
our $debug;
44
- 

Return to bug 16011