Bug 16011: $VERSION - Remove comments

perl -p -i -e 's/^.*set the version for version checking.*\n//' **/*.pm

+ manual adjustements

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@unc.edu.ar>

Signed-off-by: Brendan A Gallagher <brendan@bywatersolutions.com>
This commit is contained in:
Jonathan Druart 2016-03-09 08:40:29 +00:00 committed by Brendan A Gallagher
parent 017699c345
commit 798d38e4c7
54 changed files with 6 additions and 68 deletions

View File

@ -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(

View File

@ -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(

View File

@ -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);

View File

@ -27,7 +27,6 @@ use Digest::MD5;
use vars qw();
BEGIN {
# set the version for version checking
}
=head1 NAME

View File

@ -25,7 +25,6 @@ use base qw( Exporter );
use C4::Bookseller::Contact;
# set the version for version checking
our @EXPORT_OK = qw(
GetBooksellersWithLateOrders
ModBookseller

View File

@ -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

View File

@ -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);

View File

@ -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(

View File

@ -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(

View File

@ -26,7 +26,6 @@ use C4::Context;
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
=head1 NAME

View File

@ -22,7 +22,6 @@ use warnings;
use vars qw();
# set the version for version checking
=head1 NAME

View File

@ -22,7 +22,6 @@ use warnings;
use vars qw();
# set the version for version checking
=head1 NAME

View File

@ -24,7 +24,6 @@ use Library::CallNumber::LC;
use vars qw();
# set the version for version checking
=head1 NAME

View File

@ -26,7 +26,6 @@ use C4::ClassSortRoutine;
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
=head1 NAME

View File

@ -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(

View File

@ -25,7 +25,6 @@ package C4::Csv;
use C4::Context;
use vars qw(@ISA @EXPORT);
# set the version for version checking
@ISA = qw(Exporter);

View File

@ -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(

View File

@ -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(

View File

@ -30,7 +30,6 @@ use CGI::Session;
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
=head1 NAME

View File

@ -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

View File

@ -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);

View File

@ -26,7 +26,6 @@ use MARC::Record;
use vars qw();
BEGIN {
# set the version for version checking
}
=head1 NAME

View File

@ -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 } ) ) {

View File

@ -24,7 +24,6 @@ use C4::Context;
use vars qw();
BEGIN {
# set the version for version checking
}
=head1 NAME

View File

@ -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

View File

@ -24,7 +24,6 @@ use C4::Context;
use vars qw();
BEGIN {
# set the version for version checking
}
=head1 NAME

View File

@ -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);

View File

@ -40,7 +40,6 @@ use Koha::Account::Lines;
use vars qw(@ISA @EXPORT);
BEGIN {
# set the version for version checking
require Exporter;
@ISA = qw(Exporter);

View File

@ -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);

View File

@ -41,7 +41,6 @@ use Carp;
use vars qw(@ISA @EXPORT);
# set the version for version checking
@ISA = qw(Exporter);

View File

@ -26,7 +26,6 @@ use C4::Context;
use C4::Debug;
BEGIN {
# set the version for version checking
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(

View File

@ -37,7 +37,6 @@ use C4::Log;
use Koha::AuthorisedValues;
BEGIN {
# set the version for version checking
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(

View File

@ -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(

View File

@ -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

View File

@ -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);

View File

@ -35,7 +35,6 @@ use Data::Dumper;
use vars qw(@ISA @EXPORT);
# set the version for version checking
=head1 NAME

View File

@ -25,7 +25,6 @@ use C4::Context;
use Schedule::At;
BEGIN {
# set the version for version checking
require Exporter;
@ISA = qw(Exporter);
@EXPORT =

View File

@ -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;
}

View File

@ -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(

View File

@ -26,7 +26,6 @@ use vars qw(@ISA @EXPORT);
BEGIN {
# set the version for version checking
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(

View File

@ -29,7 +29,6 @@ use vars qw(@ISA @EXPORT);
our $debug;
BEGIN {
# set the version for version checking
@ISA = qw(Exporter);
@EXPORT = qw(
&UpdateStats

View File

@ -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

View File

@ -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 )

View File

@ -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

View File

@ -27,7 +27,6 @@ use C4::Debug;
BEGIN {
# set the version for version checking
}
=head1 NAME

View File

@ -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(

View File

@ -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);
}

View File

@ -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);
}

View File

@ -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);
}

View File

@ -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);
}

View File

@ -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(

View File

@ -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;

View File

@ -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

View File

@ -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;