From 5d5df2ca48b0e7b14c8e60bcef0e750567121902 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 9 Mar 2016 08:40:29 +0000 Subject: [PATCH] Bug 16011: $VERSION - Remove comments perl -p -i -e 's/^.*set the version for version checking.*\n//' **/*.pm + manual adjustements --- C4/Accounts.pm | 1 - C4/Acquisition.pm | 1 - C4/AuthoritiesMarc.pm | 1 - C4/BackgroundJob.pm | 1 - C4/Bookseller.pm | 1 - C4/Branch.pm | 1 - C4/Breeding.pm | 1 - C4/Budgets.pm | 1 - C4/Charset.pm | 1 - C4/ClassSortRoutine.pm | 1 - C4/ClassSortRoutine/Dewey.pm | 1 - C4/ClassSortRoutine/Generic.pm | 1 - C4/ClassSortRoutine/LCC.pm | 1 - C4/ClassSource.pm | 1 - C4/Contract.pm | 1 - C4/Csv.pm | 1 - C4/Images.pm | 1 - C4/ImportBatch.pm | 1 - C4/InstallAuth.pm | 1 - C4/Letters.pm | 1 - C4/Log.pm | 1 - C4/Matcher.pm | 1 - C4/Members.pm | 2 +- C4/Members/AttributeTypes.pm | 1 - C4/Members/Attributes.pm | 1 - C4/Members/Messaging.pm | 1 - C4/Output.pm | 1 - C4/Overdues.pm | 1 - C4/Passwordrecovery.pm | 1 - C4/Print.pm | 1 - C4/Record.pm | 1 - C4/Reports.pm | 1 - C4/Reports/Guided.pm | 1 - C4/Reserves.pm | 1 - C4/Review.pm | 1 - C4/Ris.pm | 1 - C4/RotatingCollections.pm | 1 - C4/Scheduler.pm | 1 - C4/Search.pm | 1 - C4/Serials/Frequency.pm | 1 - C4/Serials/Numberpattern.pm | 1 - C4/Stats.pm | 1 - Koha/Borrower/Files.pm | 1 - Koha/Calendar.pm | 4 ---- Koha/DateUtils.pm | 1 - Koha/NorwegianPatronDB.pm | 1 - acqui/pdfformat/layout2pages.pm | 3 +-- acqui/pdfformat/layout2pagesde.pm | 3 +-- acqui/pdfformat/layout3pages.pm | 3 +-- acqui/pdfformat/layout3pagesfr.pm | 3 +-- installer/data/mysql/backfill_statistics.pl | 3 +-- misc/cronjobs/MARC21_parse_test.pl | 3 --- misc/cronjobs/runreport.pl | 3 --- misc/maintenance/MARC21_utf8_flag_fix.pl | 3 --- 54 files changed, 6 insertions(+), 68 deletions(-) diff --git a/C4/Accounts.pm b/C4/Accounts.pm index be853a7..5243712 100644 --- a/C4/Accounts.pm +++ b/C4/Accounts.pm @@ -31,7 +31,6 @@ use Data::Dumper qw(Dumper); use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm index 2cec0ae..45ea475 100644 --- a/C4/Acquisition.pm +++ b/C4/Acquisition.pm @@ -44,7 +44,6 @@ use HTML::Entities; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index d6f7d34..39ce815 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -33,7 +33,6 @@ use Koha::Authority::Types; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); diff --git a/C4/BackgroundJob.pm b/C4/BackgroundJob.pm index 09bad9a..934611f 100644 --- a/C4/BackgroundJob.pm +++ b/C4/BackgroundJob.pm @@ -27,7 +27,6 @@ use Digest::MD5; use vars qw(); BEGIN { - # set the version for version checking } =head1 NAME diff --git a/C4/Bookseller.pm b/C4/Bookseller.pm index 2dbf427..44b9389 100644 --- a/C4/Bookseller.pm +++ b/C4/Bookseller.pm @@ -25,7 +25,6 @@ use base qw( Exporter ); use C4::Bookseller::Contact; -# set the version for version checking our @EXPORT_OK = qw( GetBooksellersWithLateOrders ModBookseller diff --git a/C4/Branch.pm b/C4/Branch.pm index 78aa7a0..5925d08 100644 --- a/C4/Branch.pm +++ b/C4/Branch.pm @@ -25,7 +25,6 @@ use Koha::LibraryCategories; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - # set the version for version checking @ISA = qw(Exporter); @EXPORT = qw( &GetBranchName diff --git a/C4/Breeding.pm b/C4/Breeding.pm index 0b1dec5..ee14c81 100644 --- a/C4/Breeding.pm +++ b/C4/Breeding.pm @@ -34,7 +34,6 @@ use Koha::XSLT_Handler; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw(&BreedingSearch &Z3950Search &Z3950SearchAuth); diff --git a/C4/Budgets.pm b/C4/Budgets.pm index 1f24980..cb47c1b 100644 --- a/C4/Budgets.pm +++ b/C4/Budgets.pm @@ -25,7 +25,6 @@ use C4::Debug; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Charset.pm b/C4/Charset.pm index 173f9d2..1f2a8c9 100644 --- a/C4/Charset.pm +++ b/C4/Charset.pm @@ -29,7 +29,6 @@ use Encode qw( decode encode is_utf8 ); use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/ClassSortRoutine.pm b/C4/ClassSortRoutine.pm index a0ce00c..d5fd8a0 100644 --- a/C4/ClassSortRoutine.pm +++ b/C4/ClassSortRoutine.pm @@ -26,7 +26,6 @@ use C4::Context; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); -# set the version for version checking =head1 NAME diff --git a/C4/ClassSortRoutine/Dewey.pm b/C4/ClassSortRoutine/Dewey.pm index 3f9c97e..f2c499f 100644 --- a/C4/ClassSortRoutine/Dewey.pm +++ b/C4/ClassSortRoutine/Dewey.pm @@ -22,7 +22,6 @@ use warnings; use vars qw(); -# set the version for version checking =head1 NAME diff --git a/C4/ClassSortRoutine/Generic.pm b/C4/ClassSortRoutine/Generic.pm index 458200c..94888ba 100644 --- a/C4/ClassSortRoutine/Generic.pm +++ b/C4/ClassSortRoutine/Generic.pm @@ -22,7 +22,6 @@ use warnings; use vars qw(); -# set the version for version checking =head1 NAME diff --git a/C4/ClassSortRoutine/LCC.pm b/C4/ClassSortRoutine/LCC.pm index aac5221..8aa6f6d 100644 --- a/C4/ClassSortRoutine/LCC.pm +++ b/C4/ClassSortRoutine/LCC.pm @@ -24,7 +24,6 @@ use Library::CallNumber::LC; use vars qw(); -# set the version for version checking =head1 NAME diff --git a/C4/ClassSource.pm b/C4/ClassSource.pm index 5f8cfe3..bb78074 100644 --- a/C4/ClassSource.pm +++ b/C4/ClassSource.pm @@ -26,7 +26,6 @@ use C4::ClassSortRoutine; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); -# set the version for version checking =head1 NAME diff --git a/C4/Contract.pm b/C4/Contract.pm index b1e7c5c..0de49ad 100644 --- a/C4/Contract.pm +++ b/C4/Contract.pm @@ -26,7 +26,6 @@ use Koha::Database; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Csv.pm b/C4/Csv.pm index 3e6fb12..ce4693a 100644 --- a/C4/Csv.pm +++ b/C4/Csv.pm @@ -25,7 +25,6 @@ package C4::Csv; use C4::Context; use vars qw(@ISA @EXPORT); -# set the version for version checking @ISA = qw(Exporter); diff --git a/C4/Images.pm b/C4/Images.pm index f956c91..37b2417 100644 --- a/C4/Images.pm +++ b/C4/Images.pm @@ -29,7 +29,6 @@ use vars qw($debug $noimage @ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/ImportBatch.pm b/C4/ImportBatch.pm index ffe6377..77ba9f3 100644 --- a/C4/ImportBatch.pm +++ b/C4/ImportBatch.pm @@ -33,7 +33,6 @@ use Koha::Logger; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/InstallAuth.pm b/C4/InstallAuth.pm index 005aea1..c91bde8 100644 --- a/C4/InstallAuth.pm +++ b/C4/InstallAuth.pm @@ -30,7 +30,6 @@ use CGI::Session; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); -# set the version for version checking =head1 NAME diff --git a/C4/Letters.pm b/C4/Letters.pm index a2e6848..4f2b3ee 100644 --- a/C4/Letters.pm +++ b/C4/Letters.pm @@ -43,7 +43,6 @@ use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { require Exporter; - # set the version for version checking @ISA = qw(Exporter); @EXPORT = qw( &GetLetters &GetLettersAvailableForALibrary &GetLetterTemplates &DelLetter &GetPreparedLetter &GetWrappedLetter &addalert &getalert &delalert &findrelatedto &SendAlerts &GetPrintMessages &GetMessageTransportTypes diff --git a/C4/Log.pm b/C4/Log.pm index ae6d67b..80a9b0a 100644 --- a/C4/Log.pm +++ b/C4/Log.pm @@ -30,7 +30,6 @@ use Koha::DateUtils; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw(&logaction &cronlogaction &GetLogStatus &displaylog &GetLogs); diff --git a/C4/Matcher.pm b/C4/Matcher.pm index d40db5f..279c0cc 100644 --- a/C4/Matcher.pm +++ b/C4/Matcher.pm @@ -26,7 +26,6 @@ use MARC::Record; use vars qw(); BEGIN { - # set the version for version checking } =head1 NAME diff --git a/C4/Members.pm b/C4/Members.pm index 56af227..c0caef3 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -41,7 +41,7 @@ use Text::Unaccent qw( unac_string ); use Koha::AuthUtils qw(hash_password); use Koha::Database; -our ($VERSION,@ISA,@EXPORT,@EXPORT_OK,$debug); +our (@ISA,@EXPORT,@EXPORT_OK,$debug); use Module::Load::Conditional qw( can_load ); if ( ! can_load( modules => { 'Koha::NorwegianPatronDB' => undef } ) ) { diff --git a/C4/Members/AttributeTypes.pm b/C4/Members/AttributeTypes.pm index fe5be4e..5ba395c 100644 --- a/C4/Members/AttributeTypes.pm +++ b/C4/Members/AttributeTypes.pm @@ -24,7 +24,6 @@ use C4::Context; use vars qw(); BEGIN { - # set the version for version checking } =head1 NAME diff --git a/C4/Members/Attributes.pm b/C4/Members/Attributes.pm index 09c60fe..a98e2f9 100644 --- a/C4/Members/Attributes.pm +++ b/C4/Members/Attributes.pm @@ -28,7 +28,6 @@ use vars qw(@ISA @EXPORT_OK @EXPORT %EXPORT_TAGS); our ($csv, $AttributeTypes); BEGIN { - # set the version for version checking @ISA = qw(Exporter); @EXPORT_OK = qw(GetBorrowerAttributes GetBorrowerAttributeValue CheckUniqueness SetBorrowerAttributes DeleteBorrowerAttribute UpdateBorrowerAttribute diff --git a/C4/Members/Messaging.pm b/C4/Members/Messaging.pm index 3b1c14b..916872e 100644 --- a/C4/Members/Messaging.pm +++ b/C4/Members/Messaging.pm @@ -24,7 +24,6 @@ use C4::Context; use vars qw(); BEGIN { - # set the version for version checking } =head1 NAME diff --git a/C4/Output.pm b/C4/Output.pm index f3c1183..9f0fe7f 100644 --- a/C4/Output.pm +++ b/C4/Output.pm @@ -36,7 +36,6 @@ use C4::Templates; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); diff --git a/C4/Overdues.pm b/C4/Overdues.pm index 0e7fe09..317b4f3 100644 --- a/C4/Overdues.pm +++ b/C4/Overdues.pm @@ -41,7 +41,6 @@ use Koha::Account::Lines; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); diff --git a/C4/Passwordrecovery.pm b/C4/Passwordrecovery.pm index 7672588..e189366 100644 --- a/C4/Passwordrecovery.pm +++ b/C4/Passwordrecovery.pm @@ -24,7 +24,6 @@ use Crypt::Eksblowfish::Bcrypt qw(en_base64); use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); push @EXPORT, qw( diff --git a/C4/Print.pm b/C4/Print.pm index 2286e2c..d0f2642 100644 --- a/C4/Print.pm +++ b/C4/Print.pm @@ -24,7 +24,6 @@ use C4::Context; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw(&NetworkPrint); diff --git a/C4/Record.pm b/C4/Record.pm index d001945..d24d631 100644 --- a/C4/Record.pm +++ b/C4/Record.pm @@ -41,7 +41,6 @@ use Carp; use vars qw(@ISA @EXPORT); -# set the version for version checking @ISA = qw(Exporter); diff --git a/C4/Reports.pm b/C4/Reports.pm index 83e6f4c..b89be52 100644 --- a/C4/Reports.pm +++ b/C4/Reports.pm @@ -26,7 +26,6 @@ use C4::Context; use C4::Debug; BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm index b27801c..c55d54d 100644 --- a/C4/Reports/Guided.pm +++ b/C4/Reports/Guided.pm @@ -37,7 +37,6 @@ use C4::Log; use Koha::AuthorisedValues; BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Reserves.pm b/C4/Reserves.pm index 42a539d..fbeca06 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -91,7 +91,6 @@ This modules provides somes functions to deal with reservations. =cut BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Review.pm b/C4/Review.pm index 71df660..5d56396 100644 --- a/C4/Review.pm +++ b/C4/Review.pm @@ -25,7 +25,6 @@ use C4::Context; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw(getreview savereview updatereview numberofreviews numberofreviewsbybiblionumber diff --git a/C4/Ris.pm b/C4/Ris.pm index e158cab..a1db07f 100644 --- a/C4/Ris.pm +++ b/C4/Ris.pm @@ -67,7 +67,6 @@ use vars qw(@ISA @EXPORT); use C4::Biblio qw(GetMarcSubfieldStructureFromKohaField); use Koha::SimpleMARC qw(read_field); -# set the version for version checking @ISA = qw(Exporter); diff --git a/C4/RotatingCollections.pm b/C4/RotatingCollections.pm index 4f7473b..709eaf2 100644 --- a/C4/RotatingCollections.pm +++ b/C4/RotatingCollections.pm @@ -35,7 +35,6 @@ use Data::Dumper; use vars qw(@ISA @EXPORT); -# set the version for version checking =head1 NAME diff --git a/C4/Scheduler.pm b/C4/Scheduler.pm index 24f46fe..304a050 100644 --- a/C4/Scheduler.pm +++ b/C4/Scheduler.pm @@ -25,7 +25,6 @@ use C4::Context; use Schedule::At; BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = diff --git a/C4/Search.pm b/C4/Search.pm index b6f9ff1..cda7ee6 100644 --- a/C4/Search.pm +++ b/C4/Search.pm @@ -39,7 +39,6 @@ use MARC::Record; use MARC::Field; use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG); -# set the version for version checking BEGIN { $DEBUG = ($ENV{DEBUG}) ? 1 : 0; } diff --git a/C4/Serials/Frequency.pm b/C4/Serials/Frequency.pm index 58ae709..509f680 100644 --- a/C4/Serials/Frequency.pm +++ b/C4/Serials/Frequency.pm @@ -25,7 +25,6 @@ use C4::Context; use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Serials/Numberpattern.pm b/C4/Serials/Numberpattern.pm index 97ed459..210b8dd 100644 --- a/C4/Serials/Numberpattern.pm +++ b/C4/Serials/Numberpattern.pm @@ -26,7 +26,6 @@ use vars qw(@ISA @EXPORT); BEGIN { - # set the version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Stats.pm b/C4/Stats.pm index 2250007..54e3a39 100644 --- a/C4/Stats.pm +++ b/C4/Stats.pm @@ -29,7 +29,6 @@ use vars qw(@ISA @EXPORT); our $debug; BEGIN { - # set the version for version checking @ISA = qw(Exporter); @EXPORT = qw( &UpdateStats diff --git a/Koha/Borrower/Files.pm b/Koha/Borrower/Files.pm index 8faab80..ad96cfe 100644 --- a/Koha/Borrower/Files.pm +++ b/Koha/Borrower/Files.pm @@ -27,7 +27,6 @@ use C4::Debug; BEGIN { - # set the version for version checking } =head1 NAME diff --git a/Koha/Calendar.pm b/Koha/Calendar.pm index a0b642b..7095aca 100644 --- a/Koha/Calendar.pm +++ b/Koha/Calendar.pm @@ -381,10 +381,6 @@ __END__ Koha::Calendar - Object containing a branches calendar -=head1 VERSION - -This documentation refers to Koha::Calendar version 0.0.1 - =head1 SYNOPSIS use Koha::Calendar diff --git a/Koha/DateUtils.pm b/Koha/DateUtils.pm index 65afaea..6207cc1 100644 --- a/Koha/DateUtils.pm +++ b/Koha/DateUtils.pm @@ -22,7 +22,6 @@ use C4::Context; use Carp; use base 'Exporter'; -use version; our $VERSION = qv('1.0.0'); our @EXPORT = ( qw( dt_from_string output_pref format_sqldatetime ) diff --git a/Koha/NorwegianPatronDB.pm b/Koha/NorwegianPatronDB.pm index 585dfd2..237ddd7 100644 --- a/Koha/NorwegianPatronDB.pm +++ b/Koha/NorwegianPatronDB.pm @@ -61,7 +61,6 @@ use Convert::BaseN; use DateTime; use base 'Exporter'; -use version; our $VERSION = qv('1.0.0'); our %EXPORT_TAGS = ( all => [qw( NLCheckSysprefs diff --git a/acqui/pdfformat/layout2pages.pm b/acqui/pdfformat/layout2pages.pm index 2fc78ee..124a48a 100644 --- a/acqui/pdfformat/layout2pages.pm +++ b/acqui/pdfformat/layout2pages.pm @@ -34,8 +34,7 @@ use Koha::Libraries; BEGIN { use Exporter (); - our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); - # set the version for version checking + our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); @ISA = qw(Exporter); @EXPORT = qw(printpdf); } diff --git a/acqui/pdfformat/layout2pagesde.pm b/acqui/pdfformat/layout2pagesde.pm index c0c228f..37706c3 100644 --- a/acqui/pdfformat/layout2pagesde.pm +++ b/acqui/pdfformat/layout2pagesde.pm @@ -34,8 +34,7 @@ use Koha::Libraries; BEGIN { use Exporter (); - our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); - # set the version for version checking + our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); @ISA = qw(Exporter); @EXPORT = qw(printpdf); } diff --git a/acqui/pdfformat/layout3pages.pm b/acqui/pdfformat/layout3pages.pm index f0c6627..cedd9b9 100644 --- a/acqui/pdfformat/layout3pages.pm +++ b/acqui/pdfformat/layout3pages.pm @@ -37,8 +37,7 @@ use Koha::Libraries; BEGIN { use Exporter (); - our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); - # set the version for version checking + our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); @ISA = qw(Exporter); @EXPORT = qw(printpdf); } diff --git a/acqui/pdfformat/layout3pagesfr.pm b/acqui/pdfformat/layout3pagesfr.pm index 157236a..694f0cb 100644 --- a/acqui/pdfformat/layout3pagesfr.pm +++ b/acqui/pdfformat/layout3pagesfr.pm @@ -36,8 +36,7 @@ use Koha::Libraries; BEGIN { use Exporter (); - our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); - # set the version for version checking + our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); @ISA = qw(Exporter); @EXPORT = qw(printpdf); } diff --git a/installer/data/mysql/backfill_statistics.pl b/installer/data/mysql/backfill_statistics.pl index 361f544..d03b461 100755 --- a/installer/data/mysql/backfill_statistics.pl +++ b/installer/data/mysql/backfill_statistics.pl @@ -16,9 +16,8 @@ use C4::Items; use C4::Debug; use Data::Dumper; -use vars qw($debug $dbh $VERSION); +use vars qw($debug $dbh); $dbh = C4::Context->dbh; -$VERSION = "1.00"; sub get_counts() { my $query = q( diff --git a/misc/cronjobs/MARC21_parse_test.pl b/misc/cronjobs/MARC21_parse_test.pl index 83b4cf0..f745f11 100755 --- a/misc/cronjobs/MARC21_parse_test.pl +++ b/misc/cronjobs/MARC21_parse_test.pl @@ -34,14 +34,11 @@ use C4::Charset; use C4::Context; use C4::Debug; -use vars qw($VERSION); - BEGIN { # find Koha's Perl modules # test carefully before changing this use FindBin; eval { require "$FindBin::Bin/../kohalib.pl" }; - $VERSION = 0.03; } our $debug; diff --git a/misc/cronjobs/runreport.pl b/misc/cronjobs/runreport.pl index ddfb6ee..4602fe7 100755 --- a/misc/cronjobs/runreport.pl +++ b/misc/cronjobs/runreport.pl @@ -35,14 +35,11 @@ use CGI qw ( -utf8 ); use Carp; use Encode; -use vars qw($VERSION); - BEGIN { # find Koha's Perl modules # test carefully before changing this use FindBin; eval { require "$FindBin::Bin/../kohalib.pl" }; - $VERSION = 0.22; } =head1 NAME diff --git a/misc/maintenance/MARC21_utf8_flag_fix.pl b/misc/maintenance/MARC21_utf8_flag_fix.pl index b0efb8d..17b885d 100755 --- a/misc/maintenance/MARC21_utf8_flag_fix.pl +++ b/misc/maintenance/MARC21_utf8_flag_fix.pl @@ -30,14 +30,11 @@ use C4::Charset; use C4::Context; use C4::Debug; -use vars qw($VERSION); - BEGIN { # find Koha's Perl modules # test carefully before changing this use FindBin; eval { require "$FindBin::Bin/../kohalib.pl" }; - $VERSION = 0.02; } our $debug; -- 2.7.0