Bug 39325: Automatic fix

Signed-off-by: Owen Leonard <oleonard@myacpl.org>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Jonathan Druart 2025-03-20 10:26:41 +01:00 committed by Katrin Fischer
parent ea832ff246
commit 1d844a7d2f
No known key found for this signature in database
GPG Key ID: 0EF6E2C03357A834
269 changed files with 563 additions and 563 deletions

View File

@ -146,7 +146,7 @@ B<$days> -- Zero balance fees older than B<$days> days old will be deleted.
B<Warning:> Because fines and payments are not linked in accountlines, it is
possible for a fine to be deleted without the accompanying payment,
or vise versa. This won't affect the account balance, but might be
or vice versa. This won't affect the account balance, but might be
confusing to staff.
=cut

View File

@ -142,9 +142,9 @@ sub GetOrderFromItemnumber {
$aqbasket = &GetBasket($basketnumber);
get all basket informations in aqbasket for a given basket
get all basket information in aqbasket for a given basket
B<returns:> informations for a given basket returned as a hashref.
B<returns:> information for a given basket returned as a hashref.
=cut
@ -2022,7 +2022,7 @@ sub get_rounded_price {
\@order_loop = GetHistory( %params );
Retreives some acquisition history information
Retrieves some acquisition history information
params:
title
@ -2547,7 +2547,7 @@ sub GetInvoices {
my $invoice = GetInvoice($invoiceid);
Get informations about invoice with given $invoiceid
Get information about invoice with given $invoiceid
Return a hash filled with aqinvoices.* fields
@ -2576,9 +2576,9 @@ sub GetInvoice {
my $invoice = GetInvoiceDetails($invoiceid)
Return informations about an invoice + the list of related order lines
Return information about an invoice + the list of related order lines
Orders informations are in $invoice->{orders} (array ref)
Orders information are in $invoice->{orders} (array ref)
=cut

View File

@ -113,7 +113,7 @@ C4::Auth - Authenticates Koha users
=head1 DESCRIPTION
The main function of this module is to provide
authentification. However the get_template_and_user function has
authentication. However the get_template_and_user function has
been provided so that a users login information is passed along
automatically. This gets loaded into the template.
@ -173,7 +173,7 @@ BEGIN {
);
This call passes the C<query>, C<flagsrequired> and C<authnotrequired>
to C<&checkauth> (in this module) to perform authentification.
to C<&checkauth> (in this module) to perform authentication.
See C<&checkauth> for an explanation of these parameters.
The C<template_name> is then used to find the correct template for
@ -766,7 +766,7 @@ user has authenticated, C<&checkauth> restarts the original script
The login page is provided using a HTML::Template, which is set in the
systempreferences table or at the top of this file. The variable C<$type>
selects which template to use, either the opac or the intranet
authentification template.
authentication template.
C<&checkauth> returns a user ID, a cookie, and a session ID. The
cookie should be sent back to the browser; it verifies that the user
@ -1032,7 +1032,7 @@ sub checkauth {
if ($logout) {
# voluntary logout the user
# check wether the user was using their shibboleth session or a local one
# check FIXME CODESPELL (wether ==> weather, whether) the user was using their shibboleth session or a local one
my $shibSuccess = C4::Context->userenv ? C4::Context->userenv->{'shibboleth'} : undef;
if ($session) {
$session->delete();
@ -1413,7 +1413,7 @@ sub checkauth {
}
}
# finished authentification, now respond
# finished authentication, now respond
if ( $auth_state eq 'completed' || $authnotrequired ) {
# successful login
@ -1691,7 +1691,7 @@ sub check_api_auth {
if ( C4::Context->preference('Version') < $kohaversion ) {
# database in need of version update; assume that
# no API should be called while databsae is in
# no API should be called while database is in
# this condition.
return ( "maintenance", undef, undef );
}
@ -1737,7 +1737,7 @@ sub check_api_auth {
# User / password auth
unless ( $userid and $password ) {
# caller did something wrong, fail the authenticateion
# caller did something wrong, fail the authentication
return ( "failed", undef, undef );
}
my $newuserid;
@ -1858,7 +1858,7 @@ sub check_api_auth {
Given a CGISESSID cookie set during a previous login to Koha, determine
if the user has the privileges specified by C<$userflags>. C<$userflags>
is passed unaltered into C<haspermission> and as such accepts all options
avaiable to that routine with the one caveat that C<check_api_auth> will
available to that routine with the one caveat that C<check_api_auth> will
also allow 'undef' to be passed and in such a case the permissions check
will be skipped altogether.
@ -1906,7 +1906,7 @@ sub check_cookie_auth {
if ( C4::Context->preference('Version') < $kohaversion ) {
# database in need of version update; assume that
# no API should be called while databsae is in
# no API should be called while database is in
# this condition.
return ( "maintenance", undef );
}

View File

@ -290,7 +290,7 @@ sub _url_with_get_params {
sub logout_if_required {
my ($query) = @_;
# Check we havent been hit by a logout call
# Check we haven't been hit by a logout call
my $xml = $query->param('logoutRequest');
return 0 unless $xml;

View File

@ -123,7 +123,7 @@ sub checkpw_ldap {
my @hosts = split( ',', $prefhost );
my $db = Net::LDAP->new( \@hosts );
unless ($db) {
warn "LDAP connexion failed";
warn "LDAP connection failed";
return 0;
}
@ -456,7 +456,7 @@ C4::Auth - Authenticates Koha users
=head1 LDAP Configuration
This module is specific to LDAP authentification. It requires Net::LDAP package and one or more
This module is specific to LDAP authentication. It requires Net::LDAP package and one or more
working LDAP servers.
To use it :
* Modify ldapserver element in KOHA_CONF

View File

@ -371,7 +371,7 @@ task to rebuild the holds queue for the biblio if I<RealTimeHoldsQueue> is enabl
=item C<skip_record_index>
Used when the indexing schedulling will be handled by the caller
Used when the indexing scheduling will be handled by the caller
=item C<record_source_id>
@ -528,7 +528,7 @@ I<$params> is a hashref containing extra parameters. Valid keys are:
=item B<skip_holds_queue>: used when the holds queue update will be handled by the caller
=item B<skip_record_index>: used when the indexing schedulling will be handled by the caller
=item B<skip_record_index>: used when the indexing scheduling will be handled by the caller
=back
=cut
@ -939,11 +939,11 @@ sub GetISBDView {
my $tagslib = GetMarcStructure( 1, $itemtype, { unsafe => 1 } );
my $ISBD = C4::Context->preference($sysprefname);
my $bloc = $ISBD;
my $block = $ISBD;
my $res;
my $blocres;
foreach my $isbdfield ( split( /#/, $bloc ) ) {
foreach my $isbdfield ( split( /#/, $block ) ) {
# $isbdfield= /(.?.?.?)/;
$isbdfield =~ /(\d\d\d)([^\|])?\|(.*)\|(.*)\|(.*)/;
@ -982,7 +982,7 @@ sub GetISBDView {
$calculated =~ s#/cgi-bin/koha/[^/]+/([^.]*.pl\?.*)$#opac-$1#g;
}
# field builded, store the result
# field built, store the result
if ( $calculated && !$hasputtextbefore ) { # put textbefore if not done
$blocres .= $textbefore;
$hasputtextbefore = 1;
@ -1027,7 +1027,7 @@ sub GetISBDView {
}
}
# field builded, store the result
# field built, store the result
if ( $calculated && !$hasputtextbefore ) { # put textbefore if not done
$blocres .= $textbefore;
$hasputtextbefore = 1;
@ -1199,7 +1199,7 @@ The following options are supported:
Pass { unsafe => 1 } do disable cached object cloning,
and instead get a shared reference, resulting in better
performance (but care must be taken so that retured object
performance (but care must be taken so that returned object
is never modified).
Note: If you call GetMarcSubfieldStructure with unsafe => 1, do not modify or
@ -2303,7 +2303,7 @@ sub TransformHtmlToMarc {
$newfield = 0;
my $j = $i + 2;
if ( $tag < 10 ) { # no code for theses fields
if ( $tag < 10 ) { # no code for FIXME CODESPELL (theses ==> these, thesis) fields
# in MARC editor, 000 contains the leader.
next if $tag == $biblionumbertagfield;
my $fval = $cgi->param( $params[ $j + 1 ] );

View File

@ -819,7 +819,7 @@ sub _recursiveAdd {
}
}
# Recursive method to add a budget and its chidren to an array
# Recursive method to add a budget and its children to an array
sub _add_budget_children {
my $res = shift;
my $budget = shift;
@ -1054,7 +1054,7 @@ sub GetBudgetsByActivity {
Get all but cancelled orders for all funds.
If the optionnal activity parameter is passed, returns orders for active/inactive budgets only.
If the optional activity parameter is passed, returns orders for active/inactive budgets only.
active = 1
inactive = 0

View File

@ -368,7 +368,7 @@ removed.
This function exists to work around a problem
that can occur with badly-encoded MARC records.
Specifically, if a UTF-8 MARC record also
has excape (\x1b) characters, MARC::File::XML
has escape (\x1b) characters, MARC::File::XML
will let the escape characters pass through
when as_xml() or as_xml_record() is called. The
problem is that the escape character is not
@ -707,7 +707,7 @@ sub _marc_to_utf8_via_text_iconv {
my $decoder;
eval { $decoder = Text::Iconv->new( $source_encoding, 'utf8' ); };
if ($@) {
push @errors, "Could not initialze $source_encoding => utf8 converter: $@";
push @errors, "Could not initialize $source_encoding => utf8 converter: $@";
return @errors;
}
@ -1043,7 +1043,7 @@ $chars{0xc777} = 0x1e87; # small w with dot above
$chars{0xc778} = 0x1e8b; # small x with dot above
$chars{0xc779} = 0x1e8f; # small y with dot above
$chars{0xc77a} = 0x017c; # small z with dot above
# 4/8 trema, diaresis
# 4/8 trema, diaeresis
$chars{0xc820} = 0x00a8; # diaeresis
$chars{0xc841} = 0x00c4; # capital a with diaeresis
$chars{0xc845} = 0x00cb; # capital e with diaeresis

View File

@ -751,7 +751,7 @@ item withdrawn.
item is restricted (set by ??)
C<$needsconfirmation> a reference to a hash. It contains reasons why the loan
could be prevented, but ones that can be overriden by the operator.
could be prevented, but ones that can be overridden by the operator.
Possible values are :
@ -1574,8 +1574,8 @@ AddIssue does the following things :
- fill recall if recall to this patron
- cancel recall or not
- revert recall's waiting status or not
* TRANSFERT PENDING ?
- complete the transfert
* FIXME CODESPELL (TRANSFERT ==> TRANSFER, TRANSFERRED) PENDING ?
- complete the FIXME CODESPELL (transfert ==> transfer, transferred)
* ISSUE THE BOOK
=back
@ -1704,7 +1704,7 @@ sub AddIssue {
C4::Reserves::MoveReserve( $item_object->itemnumber, $patron->borrowernumber, $cancelreserve );
# Starting process for transfer job (checking transfert and validate it if we have one)
# Starting process for transfer job (checking FIXME CODESPELL (transfert ==> transfer, transferred) and validate it if we have one)
if ( my $transfer = $item_object->get_transfer ) {
# updating line of branchtranfert to finish it, and changing the to branch value, implement a comment for visibility of this case (maybe for stats ....)
@ -2010,7 +2010,7 @@ category only
default branch and category
If no rule has been found in the database, it will default to
the buillt in rule:
the built in rule:
patron_maxissueqty - undef
patron_maxonsiteissueqty - undef
@ -2699,7 +2699,7 @@ Ideally, this function would be internal to C<C4::Circulation>,
not exported, but it is currently used in misc/cronjobs/longoverdue.pl
and offline_circ/process_koc.pl.
The last optional parameter allos passing skip_record_index to the item store call.
The last optional parameter allows passing skip_record_index to the item store call.
=cut
@ -4140,7 +4140,7 @@ sub CalcDateDue {
# if the calculated due date is after the 'before' Hard Due Date (ceiling), override
# if the calculated date is before the 'after' Hard Due Date (floor), override
# if the hard due date is set to 'exactly', overrride
# if the hard due date is set to 'exactly', override
if ( $hardduedatecompare == 0 || $hardduedatecompare == $cmp ) {
$datedue = $hardduedate->clone;
}

View File

@ -56,7 +56,7 @@ sub split_callnumber {
}
if ( $lines[0] =~ /^([-a-zA-Z]+)\s?($possible_decimal)$/ ) {
shift @lines; # pull off the mathching first element, like example 1
shift @lines; # pull off the matching first element, like example 1
unshift @lines, $1, $2; # replace it with the two pieces
}

View File

@ -107,7 +107,7 @@ sub import {
# Create the default context ($C4::Context::Context)
# the first time the module is called
# (a config file can be optionaly passed)
# (a config file can be optionally passed)
# default context already exists?
return if $context;

View File

@ -46,7 +46,7 @@ use C4::Contract;
=head1 DESCRIPTION
The functions in this module deal with contracts. They allow to
add a new contract, to modify it or to get some informations around
add a new contract, to modify it or to get some information around
a contract.
=cut

View File

@ -286,7 +286,7 @@ This module provides methods for creating, and otherwise manipulating batch obje
=head2 delete()
Invoking the delete method attempts to delete the template from the database. The method returns -1 upon failure. Errors are logged to the Apache log.
NOTE: This method may also be called as a function and passed a key/value pair simply deleteing that batch from the database. See the example below.
NOTE: This method may also be called as a function and passed a key/value pair simply deleting that batch from the database. See the example below.
examples:
my $exitstat = $batch->delete(); # to delete the record behind the $batch object

View File

@ -378,7 +378,7 @@ R = Right
=head2 delete()
Invoking the delete method attempts to delete the layout from the database. The method returns 0 upon success and -1 upon failure. Errors are logged to the Apache log.
NOTE: This method may also be called as a function and passed a key/value pair simply deleteing that template from the database. See the example below.
NOTE: This method may also be called as a function and passed a key/value pair simply deleting that template from the database. See the example below.
examples:
C<my $exitstat = $layout->delete(); # to delete the record behind the $layout object>

View File

@ -271,7 +271,7 @@ ADD_LAYOUTS:
my $profiles = get_all_profiles({ fields => [@fields], filters => { filters => [$value1, $value2] } });
This function returns an arrayref whose elements are hashes containing all profiles upon success and 1 upon failure. Errors are logged
to the Apache log. Two parameters are accepted. The first limits the field(s) returned. This parameter should be string of comma separted
to the Apache log. Two parameters are accepted. The first limits the field(s) returned. This parameter should be string of comma separated
fields. ie. "field_1, field_2, ...field_n" The second limits the records returned based on a string containing a valud SQL 'WHERE' filter.
NOTE: Do not pass in the keyword 'WHERE.'
@ -382,7 +382,7 @@ sub get_label_summary {
$record->{'author'} =~ s/[^\.|\w]$//
if $record->{'author'}; # strip off ugly trailing chars... but not periods or word chars
$record->{'title'} =~ s/\W*$//; # strip off ugly trailing chars
# FIXME contructing staff interface URLs should be done *much* higher up the stack - for the most part, C4 module code
# FIXME constructing staff interface URLs should be done *much* higher up the stack - for the most part, C4 module code
# should not know that it's part of a web app
$label_summary->{'_summary'} =
{ title => $record->{title}, author => $record->{author}, biblionumber => $record->{biblionumber} };
@ -527,7 +527,7 @@ sub get_table_names {
=head2 C4::Creators::Lib::html_table()
This function returns an arrayref of an array of hashes contianing the supplied data formatted suitably to
This function returns an arrayref of an array of hashes containing the supplied data formatted suitably to
be passed off as a template parameter and used to build an html table.
my $table = html_table(header_fields, array_of_row_data);

View File

@ -265,7 +265,7 @@ CM = SI Centimeters (28.3464567 points per)
=head2 delete()
Invoking the delete method attempts to delete the profile from the database. The method returns -1 upon failure. Errors are logged to the Apache log.
NOTE: This method may also be called as a function and passed a key/value pair simply deleteing that profile from the database. See the example below.
NOTE: This method may also be called as a function and passed a key/value pair simply deleting that profile from the database. See the example below.
examples:
C<my $exitstat = $profile->delete(); # to delete the record behind the $profile object>

View File

@ -309,7 +309,7 @@ This module provides methods for creating, retrieving, and otherwise manipulatin
Invoking the I<new> method constructs a new template object containing the default values for a template.
The following parameters are optionally accepted as key => value pairs:
C<profile_id> A valid profile id to be assciated with this template. NOTE: The profile must exist in the database and B<not> be assigned to another template.
C<profile_id> A valid profile id to be associated with this template. NOTE: The profile must exist in the database and B<not> be assigned to another template.
C<template_code> A template code. ie. 'Avery 5160 | 1 x 2-5/8'
C<template_desc> A readable description of the template. ie. '3 columns, 10 rows of labels'
C<page_width> The width of the page measured in the units supplied by the units parameter in this template.
@ -373,7 +373,7 @@ CM = SI Centimeters (28.3464567 points per)
=head2 delete()
Invoking the delete method attempts to delete the template from the database. The method returns -1 upon failure. Errors are logged to the Apache log.
NOTE: This method may also be called as a function and passed a key/value pair simply deleteing that template from the database. See the example below.
NOTE: This method may also be called as a function and passed a key/value pair simply deleting that template from the database. See the example below.
examples:
C<my $exitstat = $template->delete(); # to delete the record behind the $template object>

View File

@ -156,7 +156,7 @@ PREF: foreach my $option (@$messaging_options) {
=item Handle when form input is invalid
=item Generalize into a system of form handler clases
=item Generalize into a system of form handler FIXME CODESPELL (clases ==> classes, clashes, cases)
=back

View File

@ -711,7 +711,7 @@ RETRY:
sub MapItemsToHoldRequests {
my ( $hold_requests, $available_items, $branches_to_use, $transport_cost_matrix ) = @_;
# handle trival cases
# handle trivial cases
return unless scalar(@$hold_requests) > 0;
return unless scalar(@$available_items) > 0;

View File

@ -253,7 +253,7 @@ sub GetRecords {
foreach my $item (@items) {
my %item = %{ $item->unblessed };
# This hides additionnal XML subfields, we don't need these info
# This hides additional XML subfields, we don't need these info
delete $item{'more_subfields_xml'};
# Display branch names instead of branch codes
@ -493,7 +493,7 @@ sub GetPatronInfo {
my ( $item, $biblio, $biblioitem ) = ( {}, {}, {} );
# Get additional informations
# Get additional information
if ( $hold->itemnumber ) { # item level holds
$item = Koha::Items->find( $hold->itemnumber );
$biblio = $item->biblio;

View File

@ -177,7 +177,7 @@ C4::ImportExportFramework - Import/Export Framework to Excel-xml/ODS Module Func
Module to Import/Export Framework to Excel-xml/ODS on intranet administration - MARC Frameworks section
Module to Import/Export Framework to Excel-xml/ODS on intranet administration - MARC Frameworks section
exporting the tables marc_tag_structure, marc_subfield_structure to excel-xml/ods or viceversa
exporting the tables marc_tag_structure, marc_subfield_structure to excel-xml/ods or vice-versa
Functions for handling import/export.
@ -191,7 +191,7 @@ Functions for handling import/export.
Export all information of a bibliographic or authority MARC framework to an Excel "xml" file, comma separated values "csv" or OpenDocument SpreadSheet "ods".
return :
succes
success
=cut
@ -746,7 +746,7 @@ sub ImportFramework {
}
unlink($filename) if ($deleteFilename); # remove temporary file
} else {
Koha::Logger->get->warn("Error ImportFramework no conex to database or not readeable $filename");
Koha::Logger->get->warn("Error ImportFramework no conex to database or not readable $filename");
}
if ( $deleteFilename && $tempdir && -d $tempdir && -w $tempdir ) {
eval {
@ -1009,7 +1009,7 @@ sub _import_table_csv {
while ( my $row = $csv->getline($dom) ) {
my @fields = @$row;
@arrData = @fields;
next if scalar @arrData == grep { $_ eq '' } @arrData; # Emtpy lines
next if scalar @arrData == grep { $_ eq '' } @arrData; # Empty lines
#$arrData[0] = substr($arrData[0], 1) if ($arrData[0] =~ /^"/);
#$arrData[$#arrData] =~ s/[\r\n]+$//;
#chop $arrData[$#arrData] if ($arrData[$#arrData] =~ /"$/);

View File

@ -65,7 +65,7 @@ InstallAuth - Authenticates Koha users for Install process
=head1 DESCRIPTION
The main function of this module is to provide
authentification. However the get_template_and_user function has
authentication. However the get_template_and_user function has
been provided so that a users login information is passed along
automatically. This gets loaded into the template.
This package is different from C4::Auth in so far as
@ -87,7 +87,7 @@ As in C4::Auth, Authentication is based on cookies.
);
This call passes the C<query>, C<flagsrequired> and C<authnotrequired>
to C<&checkauth> (in this module) to perform authentification.
to C<&checkauth> (in this module) to perform authentication.
See C<&checkauth> for an explanation of these parameters.
The C<template_name> is then used to find the correct template for
@ -222,7 +222,7 @@ user has authenticated, C<&checkauth> restarts the original script
The login page is provided using a HTML::Template, which is set in the
systempreferences table or at the top of this file. The variable C<$type>
selects which template to use, either the opac or the intranet
authentification template.
authentication template.
C<&checkauth> returns a user ID, a cookie, and a session ID. The
cookie should be sent back to the browser; it verifies that the user
@ -341,7 +341,7 @@ sub checkauth {
}
}
# finished authentification, now respond
# finished authentication, now respond
if ($loggedin) {
# successful login

View File

@ -407,7 +407,7 @@ sub load_sql_in_order {
unless ( index( $systempreference, $file[ scalar(@file) - 1 ] ) >= 0 );
}
#Bulding here a hierarchy to display files by level.
#Building here a hierarchy to display files by level.
push @{ $hashlevel{$level} },
{ "fwkname" => $file[ scalar(@file) - 1 ], "error" => $error };
}
@ -628,7 +628,7 @@ sub load_sql {
my $filename = $installer->get_file_path_from_name('script_name');
searches through the set of known SQL scripts and finds the fully
qualified path name for the script that mathches the input.
qualified path name for the script that matches the input.
returns undef if no match was found.

View File

@ -571,7 +571,7 @@ seen. It is ordered by callnumber then title.
The required minlocation & maxlocation parameters are used to specify a range of item callnumbers
the datelastseen can be used to specify that you want to see items not seen since a past date only.
offset & size can be used to retrieve only a part of the whole listing (defaut behaviour)
offset & size can be used to retrieve only a part of the whole listing (default behaviour)
$statushash requires a hashref that has the authorized values fieldname (intems.notforloan, etc...) as keys, and an arrayref of statuscodes we are searching for as values.
$iTotalRecords is the number of rows that would have been returned without the $offset, $size limit clause

View File

@ -632,7 +632,7 @@ This module provides methods for creating, and otherwise manipulating single lab
=head2 new()
Invoking the I<new> method constructs a new label object containing the supplied values. Depending on the final output format of the label data
the minimal required parameters change. (See the implimentation of this object type in labels/label-create-pdf.pl and labels/label-create-csv.pl
the minimal required parameters change. (See the implementation of this object type in labels/label-create-pdf.pl and labels/label-create-csv.pl
and labels/label-create-xml.pl for examples.) The following parameters are optionally accepted as key => value pairs:
C<batch_id> Batch id with which this label is associated
@ -765,7 +765,7 @@ R = Right
=head2 create_label()
Invoking the I<create_label> method generates the text for that label and returns it as an arrayref of an array contianing the formatted text as well as creating the barcode
Invoking the I<create_label> method generates the text for that label and returns it as an arrayref of an array containing the formatted text as well as creating the barcode
and writing it directly to the pdf stream. The handling of the barcode is not quite good OO form due to the linear format of PDF::Reuse::Barcode. Be aware that the instantiating
code is responsible to properly format the text for insertion into the pdf stream as well as the actual insertion.

View File

@ -425,12 +425,12 @@ sub _build_languages_arrayref {
my @ordered_keys = sort {
my $aa = '';
my $bb = '';
my $acount = @{ $language_groups->{$a} };
my $account = @{ $language_groups->{$a} };
my $bcount = @{ $language_groups->{$b} };
if ( $language_groups->{$a}->[0]->{enabled} ) {
$aa = $language_groups->{$a}->[0]->{rfc4646_subtag};
} elsif ( $acount > 1 ) {
for ( my $i = 1 ; $i < $acount ; $i++ ) {
} elsif ( $account > 1 ) {
for ( my $i = 1 ; $i < $account ; $i++ ) {
if ( $language_groups->{$a}->[$i]->{enabled} ) {
$aa = $language_groups->{$a}->[$i]->{rfc4646_subtag};
last;
@ -625,7 +625,7 @@ sub accept_language {
my @languages = ();
if ($clientPreferences) {
# There should be no whitespace anways, but a cleanliness/sanity check
# There should be no whitespace anyway, but a cleanliness/sanity check
$clientPreferences =~ s/\s//g;
# Prepare the list of client-acceptable languages

View File

@ -80,7 +80,7 @@ C4::Letters - Give functions for Letters management
=head1 DESCRIPTION
"Letters" is the tool used in Koha to manage informations sent to the patrons and/or the library. This include some cron jobs like
"Letters" is the tool used in Koha to manage information sent to the patrons and/or the library. This include some cron jobs like
late issues, as well as other tasks like sending a mail to users that have subscribed to a "serial issue alert" (= being warned every time a new issue has arrived at the library)
Letters are managed through "alerts" sent by Koha on some events. All "alert" related functions are in this module too.
@ -88,7 +88,7 @@ C4::Letters - Give functions for Letters management
=head2 GetLetters([$module])
$letters = &GetLetters($module);
returns informations about letters.
returns information about letters.
if needed, $module filters for letters given module
DEPRECATED - You must use Koha::Notice::Templates instead
@ -236,7 +236,7 @@ sub GetLettersAvailableForALibrary {
);
Delete the letter. The mtt parameter is facultative.
If not given, all templates mathing the other parameters will be removed.
If not given, all templates matching the other parameters will be removed.
=cut
@ -1597,7 +1597,7 @@ sub _send_message_by_email {
}
# if initial message address was empty, coming here means that a to address was found and
# queue should be updated; same if to address was overriden by Koha::Email->create
# queue should be updated; same if to address was overridden by Koha::Email->create
_update_message_to_address( $message->{'message_id'}, $email->email->header('To') )
if !$message->{to_address}
|| $message->{to_address} ne $email->email->header('To');
@ -1975,7 +1975,7 @@ sub _get_tt_params {
},
problem_reports => {
module => 'Koha::ProblemReports',
singluar => 'problemreport',
singular => 'problemreport',
plural => 'problemreports',
pk => 'reportid'
},
@ -2040,7 +2040,7 @@ sub _get_tt_params {
my $object;
if ( @{ $tables->{$table} } == 1 ) { # Param is a single key
$object = $module->search( { $pk => $tables->{$table} } )->last();
} else { # Params are mutliple foreign keys
} else { # Params are multiple foreign keys
croak "Multiple foreign keys (table $table) should be passed using an hashref";
}
$params->{ $config->{$table}->{singular} } = $object;

View File

@ -181,7 +181,7 @@ sub logaction {
&cronlogaction($infos);
Convenience routine to add a record into action_logs table from a cron job.
Logs the path and name of the calling script plus the information privided by param $infos.
Logs the path and name of the calling script plus the information provided by param $infos.
=cut

View File

@ -487,7 +487,7 @@ parameter identifies the index that will be searched, while $score
is the weight that will be added if a match is found.
$matchcomponents should be a reference to an array of matchpoint
compoents, each of which should be a hash containing the following
components, each of which should be a hash containing the following
keys:
tag
subfields
@ -524,7 +524,7 @@ sub add_matchpoint {
Adds a simple matchpoint rule -- after composing a key based on the source tag and subfields,
normalized per the normalization fuction, search the index. All records retrieved
normalized per the normalization function, search the index. All records retrieved
will receive the assigned score.
=cut
@ -865,7 +865,7 @@ sub _get_match_keys {
# matchpoint includes both 003 and 001), any repeats
# of the first component's tag are identified; repeats
# of the subsequent components' tags are appended to
# each parallel key dervied from the first component,
# each parallel key derived from the first component,
# up to the number of repeats of the first component's tag.
#
# For example, if the record has one 003 and two 001s, only

View File

@ -43,7 +43,7 @@ This module lets you modify a patron's messaging preferences.
my $preferences = C4::Members::Messaging::GetMessagingPreferences( { categorycode => 'LIBRARY',
message_name => 'Item_Due ' } );
returns: a hashref of messaging preferences for a borrower or patron category for a particlar message_name
returns: a hashref of messaging preferences for a borrower or patron category for a particular message_name
Requires either a borrowernumber or a categorycode key, but not both.

View File

@ -264,7 +264,7 @@ sub marc2dcxml {
my ( $marcxml, $record, $output );
# set the default path for intranet xslts
# differents xslts to process (OAIDC, SRWDC and RDFDC)
# FIXME CODESPELL (differents ==> different, difference) xslts to process (OAIDC, SRWDC and RDFDC)
my $xsl =
C4::Context->config('intrahtdocs')
. '/prog/en/xslt/'

View File

@ -307,7 +307,7 @@ sub _build_query {
my @definitions = split( ',', $definition );
my $deftext;
foreach my $def (@definitions) {
my $defin = get_from_dictionary( '', $def );
my $define = get_from_dictionary( '', $def );
$deftext .= " " . $defin->[0]->{'saved_sql'};
}
if ( $query =~ /WHERE/i ) {
@ -347,7 +347,7 @@ sub get_criteria {
my ( $area, $cgi ) = @_;
my $dbh = C4::Context->dbh();
# have to do someting here to know if its dropdown, free text, date etc
# have to do something here to know if its dropdown, free text, date etc
my %criteria = (
CIRC => [
'statistics.type', 'borrowers.categorycode', 'statistics.branch',
@ -915,7 +915,7 @@ sub get_column_type {
=head2 get_distinct_values($column)
Given a column name, return an arrary ref of hashrefs suitable for use as a tmpl_loop
Given a column name, return an array ref of hashrefs suitable for use as a tmpl_loop
with the distinct values of the column
=cut
@ -1034,7 +1034,7 @@ sub get_results {
my %reserved_authorised_values = GetReservedAuthorisedValues();
Returns a hash containig all reserved words
Returns a hash containing all reserved words
=cut

View File

@ -59,12 +59,12 @@ C4::Reserves - Koha functions for dealing with reservation.
=head1 DESCRIPTION
This modules provides somes functions to deal with reservations.
This modules provides FIXME CODESPELL (somes ==> some, sums) functions to deal with reservations.
Reserves are stored in reserves table.
The following columns contains important values :
- priority >0 : then the reserve is at 1st stage, and not yet affected to any item.
=0 : then the reserve is being dealed
=0 : then the reserve is being dealt
- found : NULL : means the patron requested the 1st available, and we haven't chosen the item
T(ransit) : the reserve is linked to an item but is in transit to the pickup branch
W(aiting) : the reserve is linked to an item, is at the pickup branch, and is waiting on the hold shelf
@ -162,7 +162,7 @@ BEGIN {
Adds reserve and generates HOLDPLACED message and HOLDPLACED_PATRON message.
The following tables are available witin the HOLDPLACED message:
The following tables are available within the HOLDPLACED message:
branches
borrowers
@ -230,7 +230,7 @@ sub AddReserve {
my $waitingdate;
# If the reserv had the waiting status, we had the value of the resdate
# If the reserve had the waiting status, we had the value of the resdate
if ( $found && $found eq 'W' ) {
$waitingdate = $resdate;
}
@ -891,9 +891,9 @@ sub CheckReserves {
if ( $res->{'found'} && $res->{'found'} eq 'W' ) {
return ( "Waiting", $res, \@reserves ); # Found it, it is waiting
} elsif ( $res->{'found'} && $res->{'found'} eq 'P' ) {
return ( "Processing", $res, \@reserves ); # Found determinated hold, e. g. the transferred one
return ( "Processing", $res, \@reserves ); # Found determined hold, e. g. the transferred one
} elsif ( $res->{'found'} && $res->{'found'} eq 'T' ) {
return ( "Transferred", $res, \@reserves ); # Found determinated hold, e. g. the transferred one
return ( "Transferred", $res, \@reserves ); # Found determined hold, e. g. the transferred one
} else {
my $patron;
my $local_hold_match;
@ -1308,7 +1308,7 @@ Reduce the values of queued list
sub ModReserveMinusPriority {
my ( $itemnumber, $reserve_id ) = @_;
#first step update the value of the first person on reserv
#first step update the value of the first person on reserve
my $dbh = C4::Context->dbh;
my $query = "
UPDATE reserves
@ -1627,7 +1627,7 @@ sub _FixPriority {
}
my @priority;
# get whats left
# get what's left
my $query = "
SELECT reserve_id, borrowernumber, reservedate
FROM reserves
@ -1802,7 +1802,7 @@ The letter code for this notice may be found using the following query:
This will probably sipmly be 'HOLD', but because it is defined in the database,
it is subject to addition or change.
The following tables are availalbe witin the notice:
The following tables are available within the notice:
branches
borrowers

View File

@ -2,7 +2,7 @@ package C4::RotatingCollections;
# $Id: RotatingCollections.pm,v 0.1 2007/04/20 kylemhall
# This package is inteded to keep track of what library
# This package is intended to keep track of what library
# Items of a certain collection should be at.
# Copyright 2007 Kyle Hall

View File

@ -131,7 +131,7 @@ sub offline_ok {
# Checkout(patron_id, item_id, sc_renew):
# patron_id & item_id are the identifiers send by the terminal
# sc_renew is the renewal policy configured on the terminal
# returns a status opject that can be queried for the various bits
# returns a status object that can be queried for the various bits
# of information that the protocol (SIP or NCIP) needs to generate
# the response.

View File

@ -55,13 +55,13 @@ my %transports = (
# Read configuration
#
my $config = C4::SIP::Sip::Configuration->new( $ARGV[0] );
my @parms;
my @FIXME CODESPELL (parms ==> params, prams);
#
# Ports to bind
#
foreach my $svc ( keys %{ $config->{listeners} } ) {
push @parms, "port=" . $svc;
push @FIXME CODESPELL (parms ==> params, prams), "port=" . $svc;
}
#
@ -81,17 +81,17 @@ foreach my $svc ( keys %{ $config->{listeners} } ) {
#
if ( defined( $config->{'server-params'} ) ) {
while ( my ( $key, $val ) = each %{ $config->{'server-params'} } ) {
push @parms, $key . '=' . $val;
push @FIXME CODESPELL (parms ==> params, prams), $key . '=' . $val;
}
}
# Add user and group to prevent warn from Net::Server.
push @parms, 'user=' . $>;
push @parms, 'group=' . $>;
push @FIXME CODESPELL (parms ==> params, prams), 'user=' . $>;
push @FIXME CODESPELL (parms ==> params, prams), 'group=' . $>;
#
# This is the main event.
__PACKAGE__->run(@parms);
__PACKAGE__->run(@FIXME CODESPELL (parms ==> params, prams));
#
# Server

View File

@ -64,7 +64,7 @@ use File::Spec;
=cut
# The previous implmentation used username and password.
# The previous implementation used username and password.
# our $user = C4::Context->config('smsuser');
# our $pwd = C4::Context->config('smspass');

View File

@ -108,7 +108,7 @@ sub add_at_job {
# not check all error conditions - in particular, it does
# not check the return value of the "at" run; it basically
# complains only if it can't find at.
# 3. Similary, Schedule::At::add() does not do something more useful,
# 3. Similarly, Schedule::At::add() does not do something more useful,
# such as returning the job ID. To be fair, it is possible
# that 'at' does not allow this in any portable way.
# 4. Although unlikely, it is possible that a job could be added

View File

@ -191,7 +191,7 @@ for my $r ( @{$marcresults} ) {
my $marcrecord = MARC::File::USMARC::decode($r);
my $biblio = TransformMarcToKoha({ record => $marcrecord });
#build the iarray of hashs for the template.
#build the iarray of hashes for the template.
push @results, {
title => $biblio->{'title'},
subtitle => $biblio->{'subtitle'},
@ -307,7 +307,7 @@ sub getRecords {
my @results;
my $results_hashref = ();
# TODO simplify this structure ( { branchcode => $branchname } is enought) and remove this parameter
# TODO simplify this structure ( { branchcode => $branchname } is enough) and remove this parameter
$branches ||= { map { $_->branchcode => { branchname => $_->branchname } } Koha::Libraries->search->as_list };
# Initialize variables for the faceted results objects

View File

@ -1719,7 +1719,7 @@ sub NewIssue {
1 or 0 = HasSubscriptionStrictlyExpired($subscriptionid)
the subscription has stricly expired when today > the end subscription date
the subscription has strictly expired when today > the end subscription date
return :
1 if true, 0 if false, -1 if the expiration date is not set.
@ -1744,7 +1744,7 @@ sub HasSubscriptionStrictlyExpired {
# Getting today's date
my ( $nowyear, $nowmonth, $nowday ) = Today();
# if today's date > expiration date, then the subscription has stricly expired
# if today's date > expiration date, then the subscription has strictly expired
if ( Delta_Days( $nowyear, $nowmonth, $nowday, $endyear, $endmonth, $endday ) < 0 ) {
return 1;
} else {
@ -2486,7 +2486,7 @@ this function it takes the publisheddate and will return the next issue's date
and will skip dates if there exists an irregularity.
$publisheddate has to be an ISO date
$subscription is a hashref containing at least 'firstacquidate', 'irregularity', and 'countissuesperunit'
$frequency is a hashref containing frequency informations
$frequency is a hashref containing frequency information
$updatecount is a boolean value which, when set to true, update the 'countissuesperunit' in database
- eg if periodicity is monthly and $publisheddate is 2007-02-10 but if March and April is to be
skipped then the returned date will be 2007-05-10

View File

@ -122,10 +122,10 @@ sub GetSuggestionFromBiblionumber {
=head2 GetSuggestionInfoFromBiblionumber
Get a suggestion and borrower's informations from it's biblionumber.
Get a suggestion and borrower's information from it's biblionumber.
return :
all informations (suggestion and borrower) of the suggestion which is related to the biblionumber given.
all information (suggestion and borrower) of the suggestion which is related to the biblionumber given.
=cut
@ -149,10 +149,10 @@ sub GetSuggestionInfoFromBiblionumber {
=head2 GetSuggestionInfo
Get a suggestion and borrower's informations from it's suggestionid
Get a suggestion and borrower's information from it's suggestionid
return :
all informations (suggestion and borrower) of the suggestion which is related to the suggestionid given.
all information (suggestion and borrower) of the suggestion which is related to the suggestionid given.
=cut

View File

@ -15,7 +15,7 @@
# You should have received a copy of the GNU General Public License
# along with Koha; if not, see <http://www.gnu.org/licenses>.
#simple parser for HTML with Template Toolkit directives. Tokens are put into @tokens and are accesible via next_token and peep_token
#simple parser for HTML with Template Toolkit directives. Tokens are put into @tokens and are accessible via next_token and peep_token
package C4::TTParser;
use base qw(HTML::Parser);
use C4::TmplToken;

View File

@ -32,8 +32,8 @@ C4::UsageStats
=head1 DESCRIPTION
This package contains what is needed to report Koha statistics to hea
hea.koha-community.org is the server that centralize Koha setups informations
Koha libraries are encouraged to provide informations about their collections,
hea.koha-community.org is the server that centralize Koha setups information
Koha libraries are encouraged to provide information about their collections,
their structure,...
=cut
@ -85,7 +85,7 @@ sub BuildReport {
ReportToCommunity;
Send to hea.koha-community.org database informations
Send to hea.koha-community.org database information
=cut

View File

@ -520,7 +520,7 @@ sub pickup_locations {
my $bool = $biblio->hidden_in_opac({ [ rules => $rules ] })
Returns true if the biblio matches the hidding criteria defined in $rules.
Returns true if the biblio matches the FIXME CODESPELL (hidding ==> hiding, hidden) criteria defined in $rules.
Returns false otherwise. It involves the I<OpacHiddenItems> and
I<OpacHiddenItemsHidesRecord> system preferences.
@ -1261,7 +1261,7 @@ sub get_coins {
[ 'rft.issn', $issn ],
);
# If it's a subscription, these informations have no meaning.
# If it's a subscription, these information have no meaning.
if ( $genre ne 'journal' ) {
push @params, (
[ 'rft.aulast', $aulast ],
@ -1332,7 +1332,7 @@ sub is_serial {
my $image_url = $biblio->custom_cover_image_url
Return the specific url of the cover image for this bibliographic record.
It is built regaring the value of the system preference CustomCoverImagesURL
It is built regarding the value of the system preference CustomCoverImagesURL
=cut

View File

@ -189,7 +189,7 @@ sub summary {
=head3 to_api_mapping
This method returns the mapping for representing a Koha::Cash::Regiser::Cashup object
This method returns the mapping for representing a Koha::Cash::Register::Cashup object
on the API.
=cut

View File

@ -25,7 +25,7 @@ use base qw(Koha::Object);
=head1 NAME
Koha::ClassSplitRule Koha Classfication Spliting Rule Object class
Koha::ClassSplitRule Koha Classfication Splitting Rule Object class
=head1 API

View File

@ -29,7 +29,7 @@ use base qw(Koha::Objects);
Koha::Club::Template::EnrollemntFields
Represents a colleciton of club fields that are only set at the time a patron is enrolled
Represents a collection of club fields that are only set at the time a patron is enrolled
=head1 API

View File

@ -1197,7 +1197,7 @@ sub _get_budget {
}
);
# db does not ensure budget code is unque
# db does not ensure budget code is unique
return $schema->resultset('Aqbudget')->single(
{
budget_code => $budget_code,
@ -1340,7 +1340,7 @@ Koha::EDI
passed a message object for an invoice, add the contained invoices
and update the orderlines referred to in the invoice
As an Edifact invoice is in effect a despatch note this receipts the
As an Edifact invoice is in effect a dispatch note this receipts the
appropriate quantities in the orders
no meaningful return value
@ -1409,7 +1409,7 @@ Koha::EDI
classmark = title_level_class(edi_item)
Trys to return a title level classmark from a quote message line
Tries to return a title level classmark from a quote message line
Will return a dewey or lcc classmark if one exists according to the
value in DefaultClassificationSource syspref

View File

@ -280,7 +280,7 @@ Edifact - Edifact message handler
=head2 get_transmission
This method is useful in debugg:ing. Call on an Edifact object
This method is useful in debug:ing. Call on an Edifact object
it returns the object's transmission member
=head2 message_type

View File

@ -438,7 +438,7 @@ sub coded_substitute_text {
}
# This will take a standard code as returned
# by (orderline|substitue)-free_text (FTX seg LIN)
# by (orderline|substitute)-free_text (FTX seg LIN)
# and expand it using EditEUR code list 8B
sub translate_8B {
@ -778,7 +778,7 @@ sub pri_price {
return;
}
# unit price that will be chaged excl tax
# unit price that will be FIXME CODESPELL (chaged ==> changed, charged) excl tax
sub price_net {
my $self = shift;

View File

@ -226,7 +226,7 @@ sub message_reference {
my ( $self, $function ) = @_;
if ( $function eq 'new' || !$self->{message_reference_no} ) {
# unique 14 char mesage ref
# unique 14 char message ref
$self->{message_reference_no} = sprintf 'ME%012d', int rand($NINES_12);
}
return $self->{message_reference_no};
@ -776,7 +776,7 @@ Make handling of GIR segments more customizable
pass the string 'new'.
In practice we encode 1 message per transmission so there is only one message
referenced. were we to encode multiple messages a new reference would be
neaded for each
FIXME CODESPELL (neaded ==> needed, kneaded, headed) for each
=head2 message_header
@ -784,7 +784,7 @@ Make handling of GIR segments more customizable
=head2 interchange_trailer
returns the UNZ segment which ends the tranmission encoding the
returns the UNZ segment which ends the transmission encoding the
message count and control reference for the interchange
=head2 order_msg_header
@ -801,7 +801,7 @@ Make handling of GIR segments more customizable
Id
Agency
Returns a NAD segment containg the id and agency for for the Function
Returns a NAD segment containing the id and agency for for the Function
value. Handles the fact that NAD segments encode the value for 'EAN' differently
to elsewhere.
@ -854,7 +854,7 @@ Make handling of GIR segments more customizable
=head2 _interchange_sr_identifier
Format sender and receipient identifiers for use in the interchange header
Format sender and recipient identifiers for use in the interchange header
=head2 encode_text

View File

@ -232,7 +232,7 @@ nothing is passed. Valid values include 'opac' or 'intranet'.
=cut
sub should_hide_marc {
my ( $self, $parms ) = @_;
my ( $self, $FIXME CODESPELL (parms ==> params, prams) ) = @_;
my $frameworkcode = $parms->{frameworkcode} // q{};
my $interface = $parms->{interface} // 'opac';
my $hide = _should_hide_on_interface();

View File

@ -182,7 +182,7 @@ sub build {
=head2 launch
Launches the popup for this plugin by calling its launcher sub
Old style plugins still expect to receive a CGI oject, new style
Old style plugins still expect to receive a CGI object, new style
plugins expect a params hashref.
Returns undef on failure, otherwise launcher return value (if any).

View File

@ -54,7 +54,7 @@ sub existing_statuses {
# We need the 'status' field for obvious reasons, the 'backend' field is required to not
# throw 'Koha::Exceptions::Ill::InvalidBackendId' when we're converting to a Koha object.
# Finally, to get around 'ONLY_FULL_GROUP_BY', we have to be explicit about which
# 'request_id' we want to return, hense the 'MAX' call.
# 'request_id' we want to return, hence the 'MAX' call.
my $ill_requests = Koha::ILL::Requests->search(
{ backend => $backend_id },
{

View File

@ -935,7 +935,7 @@ sub can_article_request {
my $bool = $item->hidden_in_opac({ [ rules => $rules ] })
Returns true if item fields match the hidding criteria defined in $rules.
Returns true if item fields match the FIXME CODESPELL (hidding ==> hiding, hidden) criteria defined in $rules.
Returns false otherwise.
Takes HASHref that can have the following parameters:

View File

@ -52,7 +52,7 @@ from this table. However, this method does accept an arbitrary
string as 'tabletag', and an arbitrary integer as 'recordid'.
Particular Koha::Misc::Files object can have one or more file records
(actuall file contents + various file metadata) associated with it.
(FIXME CODESPELL (actuall ==> actually, actual) file contents + various file metadata) associated with it.
In case of an error (wrong parameter format) it returns undef.
@ -150,7 +150,7 @@ my $file = $mf->GetFile( id => $file_id );
For an individual, specific file ID this method returns a hashref
containing all metadata (file_id, table_tag, record_id, file_name,
file_type, file_description, file_content, date_uploaded), plus
an actuall contents of a file (in 'file_content'). In typical usage
an FIXME CODESPELL (actuall ==> actually, actual) contents of a file (in 'file_content'). In typical usage
scenarios, for a given $mf object, specific file IDs have to be
obtained first by GetFilesInfo() call.
@ -218,7 +218,7 @@ sub DelAllFiles {
$mf->MergeFileRecIds(@ids_to_be_merged);
This method re-associates all individuall file records associated with
This method re-associates all FIXME CODESPELL (individuall ==> individually, individual) file records associated with
some "parent" records IDs (provided in @ids_to_be_merged) with the given
single $mf object (which would be treated as a "parent" destination).

View File

@ -65,7 +65,7 @@ preferences (OAI-PMH:archiveID and OAI-PMH:MaxCount) and the server returns
records in marcxml or dublin core format. Dublin core records are created from
koha marcxml records transformed with XSLT. Used XSL file is located in koha-
tmpl/intranet-tmpl/prog/en/xslt directory and chosen based on marcflavour,
respecively MARC21slim2OAIDC.xsl for MARC21 and MARC21slim2OAIDC.xsl for
respectively MARC21slim2OAIDC.xsl for MARC21 and MARC21slim2OAIDC.xsl for
UNIMARC.
In extended mode, it's possible to parameter other format than marcxml or

View File

@ -52,7 +52,7 @@ use Koha::Patron::Password::Recovery;
=head2 ValidateBorrowernumber
$alread = ValidateBorrowernumber( $borrower_number );
$already = ValidateBorrowernumber( $borrower_number );
Check if the system already start recovery

View File

@ -768,9 +768,9 @@ sub format_dates {
my ( $self, $params ) = @_;
foreach my $date_type (qw(dateofbirth dateenrolled dateexpiry date_renewed)) {
my $tempdate = $params->{borrower}->{$date_type} or next();
my $template = $params->{borrower}->{$date_type} or next();
my $formatted_date =
eval { output_pref( { dt => dt_from_string($tempdate), dateonly => 1, dateformat => 'iso' } ); };
eval { output_pref( { dt => dt_from_string($template), dateonly => 1, dateformat => 'iso' } ); };
if ($formatted_date) {
$params->{borrower}->{$date_type} = $formatted_date;

View File

@ -156,7 +156,7 @@ Then name of the plugin method used. For example 'tool' or 'report'.
=item B<PLUGIN_PATH>
The URL path to the plugin. It can be used in templates in order to localize
ressources like images in html tags, or other templates.
resources like images in html tags, or other templates.
=item B<PLUGIN_DIR>
@ -344,7 +344,7 @@ sub _version_compare {
push( @v1, 0 ) unless defined( $v1[$i] );
push( @v2, 0 ) unless defined( $v2[$i] );
# Strip letters before comparing, supresses 'Argument "v1" isn't numeric in int' warning
# Strip letters before comparing, suppresses 'Argument "v1" isn't numeric in int' warning
$v1[$i] =~ s/^v//g;
$v2[$i] =~ s/^v//g;
@ -359,7 +359,7 @@ sub _version_compare {
=head2 is_enabled
Method that returns wether the plugin is enabled or not
Method that returns FIXME CODESPELL (wether ==> weather, whether) the plugin is enabled or not
$plugin->enable

View File

@ -43,7 +43,7 @@ Koha::REST::Plugin::Exceptions
}
Provides a generic and reusable way to throw unhandled exceptions. This way we
can centralize the behaviour control (e.g. production vs. development environmet)
can centralize the behaviour control (e.g. production vs. development environment)
=cut

View File

@ -38,14 +38,14 @@ sub get {
if ( C4::Context->config("enable_plugins") ) {
my $path = $c->req->url->path->leading_slash(1);
return $c->render( status => 400, openapi => { error => 'Endpoint inteded for plugin static files' } )
return $c->render( status => 400, openapi => { error => 'Endpoint intended for plugin static files' } )
unless "$path" =~ /^\/api\/v1\/contrib/;
my $namespace = $path->[3];
my $checkpath = '/api/v1/contrib/' . $namespace . '/static';
return $c->render( status => 400, openapi => { error => 'Endpoint inteded for plugin static files' } )
return $c->render( status => 400, openapi => { error => 'Endpoint intended for plugin static files' } )
unless "$path" =~ /\Q$checkpath/;
my @plugins = Koha::Plugins->new()->GetPlugins(

View File

@ -37,7 +37,7 @@ B<filter ($record)> - apply the filter and return the result. $record
may be either a scalar or an arrayref, and the return result will be
the same type.
These methods may be overriden:
These methods may be overridden:
B<initialize (%params)> - initialize the filter

View File

@ -38,7 +38,7 @@ The following variables must be defined in each filter:
our $NAME ='Filter';
our $VERSION = '1.0';
These methods may be overriden:
These methods may be overridden:
B<initialize (%params)> - initialize the filter
@ -87,7 +87,7 @@ sub new {
=head2 initialize
$filter->initalize(%params);
$filter->initialize(%params);
Initialize a filter using the specified parameters.

View File

@ -184,7 +184,7 @@ the fax number for your patron/borrower's primary address
data_type: 'mediumtext'
is_nullable: 1
the secondary email addres for your patron/borrower's primary address
the secondary email address for your patron/borrower's primary addresss
=head2 phonepro
@ -368,7 +368,7 @@ comment on the stop of the patron
data_type: 'longtext'
is_nullable: 1
used for children and profesionals to include surname or last name of guarantor or organization name
used for children and professionals to include surname or last name of guarantor or organization name
=head2 contactfirstname
@ -621,7 +621,7 @@ lang to use to send notices to this patron
default_value: 0
is_nullable: 0
number of failed login attemps
number of failed login attempts
=head2 overdrive_auth_token

View File

@ -51,7 +51,7 @@ id for the bibliographic record the hold has been placed against
is_foreign_key: 1
is_nullable: 1
If item-level, the id for the item the hold has been placed agains
If item-level, the id for the item the hold has been placed FIXME CODESPELL (agains ==> against, again)
=head2 date_created

View File

@ -38,7 +38,7 @@ unique identifier assigned to each bibliographic record
is_nullable: 0
size: 4
foriegn key from the biblio_framework table to identify which framework was used in cataloging this record
foreign key from the biblio_framework table to identify which framework was used in cataloging this record
=head2 author

View File

@ -184,7 +184,7 @@ the fax number for your patron/borrower's primary address
data_type: 'mediumtext'
is_nullable: 1
the secondary email addres for your patron/borrower's primary address
the secondary email address for your patron/borrower's primary addresss
=head2 phonepro
@ -366,7 +366,7 @@ comment on the stop of patron
data_type: 'longtext'
is_nullable: 1
used for children and profesionals to include surname or last name of guarantor or organization name
used for children and professionals to include surname or last name of guarantor or organization name
=head2 contactfirstname
@ -618,7 +618,7 @@ lang to use to send notices to this patron
default_value: 0
is_nullable: 0
number of failed login attemps
number of failed login attempts
=head2 overdrive_auth_token

View File

@ -383,7 +383,7 @@ inventory number (MARC21 952$i)
is_nullable: 1
size: 32
'new' value, you can put whatever free-text information. This field is intented to be managed by the automatic_item_modification_by_age cronjob.
'new' value, you can put whatever free-text information. This field is FIXME CODESPELL (intented ==> intended, indented) to be managed by the automatic_item_modification_by_age cronjob.
=head2 exclude_from_local_holds_priority

View File

@ -43,7 +43,7 @@ The preferred day of the week for delivery.
data_type: 'mediumtext'
is_nullable: 0
The Authorised_Value definining the pattern for delivery.
The Authorised_Value defining the pattern for delivery.
=head2 fav_itemtypes

View File

@ -387,7 +387,7 @@ inventory number (MARC21 952$i)
is_nullable: 1
size: 32
'new' value, you can put whatever free-text information. This field is intented to be managed by the automatic_item_modification_by_age cronjob.
'new' value, you can put whatever free-text information. This field is FIXME CODESPELL (intented ==> intended, indented) to be managed by the automatic_item_modification_by_age cronjob.
=head2 exclude_from_local_holds_priority

View File

@ -54,7 +54,7 @@ The branchcode of a branch belonging to the parent group
is_nullable: 1
size: 100
Short description of the goup
Short description of the group
=head2 description

View File

@ -61,7 +61,7 @@ Branch this stage relates to
default_value: 4
is_nullable: 0
The number of days items shoud occupy this stage
The number of days items should occupy this stage
=cut

View File

@ -53,7 +53,7 @@ borrower that accepted access to this list
is_nullable: 1
size: 10
temporary string used in accepting the invitation to access thist list; not-empty means that the invitation has not been accepted yet
temporary string used in accepting the invitation to access this list; not-empty means that the invitation has not been accepted yet
=head2 sharedate

View File

@ -1209,7 +1209,7 @@ each call to C<MARC::Record>->field) we create an optimized structure of mapping
rules keyed by MARC field tags holding all the mapping rules for that particular tag.
We can then iterate through all MARC fields for each record and apply all relevant
rules once per fields instead of retreiving fields multiple times for each mapping rule
rules once per fields instead of retrieving fields multiple times for each mapping rule
which is terribly slow.
=cut

View File

@ -255,7 +255,7 @@ sub index_status {
Generate Elasticsearch mappings from mappings stored in database and
perform a request to update Elasticsearch index mappings. Will throw an
error and set index status to C<INDEX_STATUS_RECREATE_REQUIRED> if update
failes.
fails.
=cut

View File

@ -36,7 +36,7 @@ namespace, and provide the following methods:
B<get_suggestions ($search)> - get suggestions from the plugin for the
specified search.
These methods may be overriden:
These methods may be overridden:
B<initialize (%params)> - initialize the plugin

View File

@ -38,7 +38,7 @@ B<NAME> - return a string with the name of the plugin.
B<VERSION> - return a string with the version of the plugin.
These methods may be overriden:
These methods may be overridden:
B<initialize (%params)> - initialize the plugin
@ -81,7 +81,7 @@ sub new {
=head2 initialize
$plugin->initalize(%params);
$plugin->initialize(%params);
Initialize a filter using the specified parameters.

View File

@ -25,7 +25,7 @@ Koha::Template::Plugin::Asset
The Asset plugin is a helper that generates HTML tags for JS and CSS files
=head1 SYNOPSYS
=head1 SYNOPSIS
[% USE Asset %]

View File

@ -21,7 +21,7 @@ package Koha::Template::Plugin::TablesSettings;
Koha::Template::Plugin::TablesSettings
=head2 SYNOPSYS
=head2 SYNOPSIS
[% USE TablesSettings %]

View File

@ -36,8 +36,8 @@ BEGIN {
@EXPORT = qw(printpdf);
}
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurment of PDF::API2).
#The constants exported transform that into PostScript points (/mm for milimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurement of PDF::API2).
#The constants exported transform that into PostScript points (/mm for millimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
use constant mm => 25.4 / 72;
use constant in => 1 / 72;
use constant pt => 1;

View File

@ -36,8 +36,8 @@ BEGIN {
@EXPORT_OK = qw(printpdf);
}
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurment of PDF::API2).
#The constants exported transform that into PostScript points (/mm for milimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurement of PDF::API2).
#The constants exported transform that into PostScript points (/mm for millimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
use constant mm => 25.4 / 72;
use constant in => 1 / 72;
use constant pt => 1;

View File

@ -38,8 +38,8 @@ BEGIN {
@EXPORT = qw(printpdf);
}
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurment of PDF::API2).
#The constants exported transform that into PostScript points (/mm for milimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurement of PDF::API2).
#The constants exported transform that into PostScript points (/mm for millimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
use constant mm => 25.4 / 72;
use constant in => 1 / 72;
use constant pt => 1;

View File

@ -39,8 +39,8 @@ BEGIN {
@EXPORT = qw(printpdf);
}
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurment of PDF::API2).
#The constants exported transform that into PostScript points (/mm for milimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
#be careful, all the sizes (height, width, etc...) are in mm, not PostScript points (the default measurement of PDF::API2).
#The constants exported transform that into PostScript points (/mm for millimeter, /in for inch, pt is postscript point, and as so is there only to show what is happening.
use constant mm => 25.4 / 72;
use constant in => 1 / 72;
use constant pt => 1;

View File

@ -450,7 +450,7 @@ Name of DBMS user account for Koha's database.
=item DB_PASS
Pasword of DMBS user account for Koha's database.
Password of DMBS user account for Koha's database.
=item ZEBRA_MARC_FORMAT

View File

@ -50,7 +50,7 @@ basket.pl
=head1 DESCRIPTION
This script display all informations about basket for the supplier given
This script display all information about basket for the supplier given
on input arg. Moreover, it allows us to add a new order for this supplier from
an existing record, a suggestion or a new record.

View File

@ -281,7 +281,7 @@ if ( $op eq "add_form" ) {
selectedbaskets => $selecteds
);
# Get general informations about the basket group to prefill the form
# Get general information about the basket group to prefill the form
my $basketgroup = GetBasketgroup($basketgroupid);
$template->param(
name => $basketgroup->{name},

View File

@ -28,7 +28,7 @@ booksellers.pl
=head1 DESCRIPTION
this script displays the list of suppliers & baskets like C<$supplier> given on input arg.
thus, this page brings differents features like to display supplier's details,
thus, this page brings FIXME CODESPELL (differents ==> different, difference) features like to display supplier's details,
to add an order for a specific supplier or to just add a new supplier.
=head1 CGI PARAMETERS

View File

@ -26,7 +26,7 @@ use C4::Budgets qw( GetBudget );
=head1 DESCRIPTION
fetches the budget amount fron the DB
fetches the budget amount FIXME CODESPELL (fron ==> from, front) the DB
=cut

View File

@ -345,7 +345,7 @@ $template->param(
defined($invoice_files) && $template->param( files => $invoice_files->GetFilesInfo() );
# FIXME
# Fonction dupplicated from basket.pl
# Function duplicated from basket.pl
# Code must to be exported. Where ??
sub get_infos {
my $order = shift;

View File

@ -448,7 +448,7 @@ $template->param(
$template->param(
existing => $biblionumber,
# basket informations
# basket information
basketname => $basket->{'basketname'},
basketnote => $basket->{'note'},
booksellerid => $basket->{'booksellerid'},

View File

@ -32,7 +32,7 @@ a supplier. This script is called from acqui/supplier.pl.
=head1 CGI PARAMETERS
All informations regarding this supplier are listed on input parameter.
All information regarding this supplier are listed on input parameter.
Here is the list :
supplier, id, company, company_postal, physical, company_phone,

View File

@ -254,7 +254,7 @@ if ( $op eq 'list' ) {
my $period_total = 0;
my ( $period_alloc_total, $spent_total, $ordered_total, $available_total ) = ( 0, 0, 0, 0 );
#This Looks WEIRD to me : should budgets be filtered in such a way ppl who donot own it would not see the amount spent on the budget by others ?
#This Looks WEIRD to me : should budgets be filtered in such a way ppl who FIXME CODESPELL (donot ==> do not, donut) own it would not see the amount spent on the budget by others ?
my @budgets_to_display;
foreach my $budget (@budgets) {

View File

@ -26,7 +26,7 @@ use C4::Budgets qw( CheckBudgetParent GetBudget );
=head1 DESCRIPTION
fetches the budget amount fron the DB,
fetches the budget amount FIXME CODESPELL (fron ==> from, front) the DB,
called by aqbudgets.pl and neworderempty.pl
=cut

View File

@ -54,7 +54,7 @@ $period = GetBudgetPeriod($period_id) if $period_id;
$parent = GetBudget($parent_id) if defined $parent_id;
$budget = GetBudget($budget_id) if defined $budget_id;
# CHECK THE PARENT BUDGET FOR ENOUGHT AMOUNT UNALLOCATED, IF NOT THEN RETURN 1
# CHECK THE PARENT BUDGET FOR ENOUGH AMOUNT UNALLOCATED, IF NOT THEN RETURN 1
my ( $sub_unalloc, $period_sum, $budget_period_unalloc );
if ($parent) {

View File

@ -110,8 +110,8 @@ if ( $op eq 'acct_form' ) {
$schema->resultset('VendorEdiAccount')->search( { id => scalar $input->param('id'), } )->delete_all;
}
# we do a default dispaly after deletes and saves
# as well as when thats all you want
# we do a default display after deletes and saves
# as well as when that's all you want
$template->param( display => 1 );
my @ediaccounts = $schema->resultset('VendorEdiAccount')->search(
{},

View File

@ -422,7 +422,7 @@ sub get_prefs_from_files {
return @names;
}
# Return an array containg all preferences defined in DB
# Return an array containing all preferences defined in DB
sub get_prefs_from_db {
my $dbh = C4::Context->dbh;

View File

@ -438,7 +438,7 @@ sub build_tabs {
fixedfield => ( $tag < 10 ) ? (1) : (0),
random => CreateKey,
);
if ( $tag >= 10 ) { # no indicator for theses tag
if ( $tag >= 10 ) { # no indicator for FIXME CODESPELL (theses ==> these, thesis) tag
$tag_data{indicator1} = format_indicator( $field->indicator(1) ),
$tag_data{indicator2} = format_indicator( $field->indicator(2) ),;
}

View File

@ -251,7 +251,7 @@ for ( my $tabloop = 0 ; $tabloop <= 10 ; $tabloop++ ) {
# now, build item tab !
# the main difference is that datas are in lines and not in columns : thus, we build the <th> first, then the values...
# loop through each tag
# warning : we may have differents number of columns in each row. Thus, we first build a hash, complete it if necessary
# warning : we may have FIXME CODESPELL (differents ==> different, difference) number of columns in each row. Thus, we first build a hash, complete it if necessary
# then construct template.
my @fields = $record->fields();
my %witness; #---- stores the list of subfields used at least once, with the "meaning" of the code

View File

@ -411,7 +411,7 @@ if ( $params->{'limit-yr'} ) {
}
push @limits, $limit_yr;
#FIXME: Should return a error to the user, incorect date format specified
#FIXME: Should return a error to the user, incorrect date format specified
}
# convert indexes and operands to corresponding parameter names for the z3950 search

Some files were not shown because too many files have changed in this diff Show More