Browse Source

Bug 21719: Fix typos

This patch was generated using codespell

Test plan:
Read through changes and confirm they make sense

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>

Signed-off-by: Owen Leonard <oleonard@myacpl.org>

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

https://bugs.koha-community.org/show_bug.cgi?id=21706

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
18.11.x
Josef Moravec 3 years ago
committed by Nick Clemens
parent
commit
543630b3c4
  1. 2
      C4/Labels/Label.pm
  2. 2
      Koha/AuthUtils.pm
  3. 4
      Makefile.PL
  4. 2
      basket/sendbasket.pl
  5. 6
      catalogue/search.pl
  6. 8
      circ/branchtransfers.pl
  7. 4
      circ/returns.pl
  8. 2
      installer/html-template-to-template-toolkit.pl
  9. 2
      installer/install.pl
  10. 6
      koha-tmpl/intranet-tmpl/prog/en/data/marc21_field_008.xml
  11. 2
      koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt
  12. 2
      koha-tmpl/intranet-tmpl/prog/en/modules/acqui/neworderempty.tt
  13. 2
      koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/patrons.pref
  14. 2
      koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2MODS.xsl
  15. 2
      koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2intranetDetail.xsl
  16. 6
      koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-auth.tt
  17. 6
      koha-tmpl/opac-tmpl/bootstrap/en/modules/sco/sco-main.tt
  18. 4
      labels/label-manage.pl
  19. 2
      misc/batchDeleteUnusedSubfields.pl
  20. 2
      misc/check_sysprefs.pl
  21. 2
      opac/ilsdi.pl
  22. 2
      opac/opac-passwd.pl
  23. 2
      opac/opac-reserve.pl
  24. 2
      opac/opac-search.pl
  25. 2
      opac/opac-sendbasket.pl
  26. 2
      opac/opac-sendshelf.pl
  27. 4
      patroncards/manage.pl
  28. 2
      reports/borrowers_stats.pl
  29. 8
      reports/guided_reports.pl
  30. 2
      reserve/request.pl
  31. 2
      serials/routing-preview.pl
  32. 2
      serials/subscription-detail.pl

2
C4/Labels/Label.pm

@ -408,7 +408,7 @@ sub draw_label_text {
else {
$field->{'data'} = _get_barcode_data($field->{'code'},$item,$record);
}
# Find apropriate font it oblique title selected, except main font is oblique
# Find appropriate font it oblique title selected, except main font is oblique
if ( ( $field->{'code'} eq 'title' ) and ( $self->{'oblique_title'} == 1 ) ) {
if ( $font =~ /^TB$/ ) {
$font .= 'I';

2
Koha/AuthUtils.pm

@ -79,7 +79,7 @@ sub hash_password {
For general password salting a C<$strength> of C<weak> is recommend,
For generating a server-salt a C<$strength> of C<strong> is recommended
'strong' uses /dev/random which may block until sufficient entropy is acheived.
'strong' uses /dev/random which may block until sufficient entropy is achieved.
'weak' uses /dev/urandom and is non-blocking.
=item length

4
Makefile.PL

@ -1181,7 +1181,7 @@ PazPar2 port?);
$msg = q(
Use memcached to cache the results of some function calls?
This provides a signficant performance improvement.
This provides a significant performance improvement.
You will need a Memcached server running.);
$msg .= _add_valid_values_disp('USE_MEMCACHED', $valid_values);
$config{'USE_MEMCACHED'} = _get_value('USE_MEMCACHED', $msg, $defaults->{'USE_MEMCACHED'}, $valid_values, $install_log_values);
@ -1219,7 +1219,7 @@ Would you like to run the database-dependent test suite?);
THE DATA IN THIS DATABASE WILL BE DESTROYED during the process of
testing. Please don't do this on your production database. It is not
reversable.
reversible.
YOU WILL SUFFER DATA LOSS if you run this test suite on your test
database. You are better off not running this optional test suite than

2
basket/sendbasket.pl

@ -163,7 +163,7 @@ END_OF_BODY
$template->param( SENT => "1" );
}
else {
# do something if it doesnt work....
# do something if it doesn't work....
carp "Error sending mail: $Mail::Sendmail::error \n";
$template->param( error => 1 );
}

6
catalogue/search.pl

@ -94,7 +94,7 @@ weighting, koha-specific relevance ranking, and stemming. When I have a chance
I'll try to flesh out this section to better explain.
This query incorporates query profiles that aren't compatible with most non-Zebra
Z39.50 targets to acomplish the field weighting and relevance ranking.
Z39.50 targets to accomplish the field weighting and relevance ranking.
=item 2 $simple_query - a simple query that doesn't contain the field weighting,
stemming, etc., suitable to pass off to other search targets
@ -294,7 +294,7 @@ if ( $template_type eq 'advsearch' ) {
# shouldn't appear on the first one, scan indexes should, adding a new
# box should only appear on the last, etc.
my @search_boxes_array;
my $search_boxes_count = 3; # begin whith 3 boxes
my $search_boxes_count = 3; # begin with 3 boxes
# FIXME: all this junk can be done in TMPL using __first__ and __last__
for (my $i=1;$i<=$search_boxes_count;$i++) {
# if it's the first one, don't display boolean option, but show scan indexes
@ -384,7 +384,7 @@ my @indexes = map uri_unescape($_), $cgi->multi_param('idx');
# if a simple index (only one) display the index used in the top search box
if ($indexes[0] && (!$indexes[1] || $params->{'scan'})) {
my $idx = "ms_".$indexes[0];
$idx =~ s/\,/comma/g; # template toolkit doesnt like variables with a , in it
$idx =~ s/\,/comma/g; # template toolkit doesn't like variables with a , in it
$template->param($idx => 1);
}

8
circ/branchtransfers.pl

@ -111,20 +111,20 @@ elsif ( $request eq 'KillReserved' ) {
} # FIXME else?
}
# collect the stack of books already transfered so they can printed...
# collect the stack of books already transferred so they can printed...
my @trsfitemloop;
my $transfered;
my $transferred;
my $barcode = $query->param('barcode');
# remove leading/trailing whitespace
defined $barcode and $barcode =~ s/^\s*|\s*$//g; # FIXME: barcodeInputFilter
# warn "barcode : $barcode";
if ($barcode) {
( $transfered, $messages ) =
( $transferred, $messages ) =
transferbook( $tobranchcd, $barcode, $ignoreRs );
my $item = Koha::Items->find({ barcode => $barcode });
$found = $messages->{'ResFound'};
if ($transfered) {
if ($transferred) {
my %item;
my $biblio = $item->biblio;
my $frbranchcd = C4::Context->userenv->{'branch'};

4
circ/returns.pl

@ -360,7 +360,7 @@ my $waiting = 0;
my $reserved = 0;
# new op dev : we check if the document must be returned to his homebranch directly,
# if the document is transfered, we have warning message .
# if the document is transferred, we have warning message .
if ( $messages->{'WasTransfered'} ) {
$template->param(
@ -385,7 +385,7 @@ if ( $messages->{'Wrongbranch'} ){
);
}
# case of wrong transfert, if the document wasn't transfered to the right library (according to branchtransfer (tobranch) BDD)
# case of wrong transfert, if the document wasn't transferred to the right library (according to branchtransfer (tobranch) BDD)
if ( $messages->{'WrongTransfer'} and not $messages->{'WasTransfered'}) {
$template->param(

2
installer/html-template-to-template-toolkit.pl

@ -102,7 +102,7 @@ foreach my $file (@template_files) {
# Process..
# NB: if you think you're seeing double, you probably are, *some* (read:most) patterns appear twice: once with quotations marks, once without.
# trying to combine them into a single pattern proved troublesome as a regex like ['"]?(.*?)['"]? was causing problems and fixing the problem caused (alot) more complex regex
# trying to combine them into a single pattern proved troublesome as a regex like ['"]?(.*?)['"]? was causing problems and fixing the problem caused (a lot) more complex regex
# variables
$input_tmpl =~ s/<[!-]*\s*TMPL_VAR\s+NAME\s?=\s?['"]?\s*(\w*?)\s*['"]?\s+ESCAPE=['"](\w*?)['"]\s+DEFAULT=['"]?(.*?)['"]?\s*-*>/[% DEFAULT $cur_scope[-1]$1="$3" |$2 %]/ig;

2
installer/install.pl

@ -292,7 +292,7 @@ elsif ( $step && $step == 3 ) {
# Where <level> is a category of requirement : required, recommended optional
# level should contain :
# SQL File for import With a readable name.
# txt File taht explains what this SQL File is meant for.
# txt File that explains what this SQL File is meant for.
# Could be VERY useful to have A Big file for a kind of library.
# But could also be useful to have some Authorised values data set prepared here.
# Marcflavour Selection is achieved through radiobuttons.

6
koha-tmpl/intranet-tmpl/prog/en/data/marc21_field_008.xml

@ -181,7 +181,7 @@
<Value code="r"><description>Directories</description></Value>
<Value code="s"><description>Statistics</description></Value>
<Value code="t"><description>Technical reports</description></Value>
<Value code="u"><description>Standars/specifications</description></Value>
<Value code="u"><description>Standards/specifications</description></Value>
<Value code="v"><description>Legal cases and case notes</description></Value>
<Value code="w"><description>Law reports and digests</description></Value>
<Value code="y"><description>Yearbooks</description></Value>
@ -212,7 +212,7 @@
<Value code="r"><description>Directories</description></Value>
<Value code="s"><description>Statistics</description></Value>
<Value code="t"><description>Technical reports</description></Value>
<Value code="u"><description>Standars/specifications</description></Value>
<Value code="u"><description>Standards/specifications</description></Value>
<Value code="v"><description>Legal cases and case notes</description></Value>
<Value code="w"><description>Law reports and digests</description></Value>
<Value code="y"><description>Yearbooks</description></Value>
@ -243,7 +243,7 @@
<Value code="r"><description>Directories</description></Value>
<Value code="s"><description>Statistics</description></Value>
<Value code="t"><description>Technical reports</description></Value>
<Value code="u"><description>Standars/specifications</description></Value>
<Value code="u"><description>Standards/specifications</description></Value>
<Value code="v"><description>Legal cases and case notes</description></Value>
<Value code="w"><description>Law reports and digests</description></Value>
<Value code="y"><description>Yearbooks</description></Value>

2
koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt

@ -314,7 +314,7 @@
<legend>Accounting details</legend>
<ol>
<li>
<!-- origquantityrec only here for javascript compatibility (additem.js needs it, useless here, usefull when receiveing an order -->
<!-- origquantityrec only here for javascript compatibility (additem.js needs it, useless here, useful when receiveing an order -->
<input id="origquantityrec" readonly="readonly" type="hidden" name="origquantityrec" value="1" />
</li>
<li>

2
koha-tmpl/intranet-tmpl/prog/en/modules/acqui/neworderempty.tt

@ -318,7 +318,7 @@
[% END %]
<span class="required">Required</span>
[% END %]
<!-- origquantityrec only here for javascript compatibility (additem.js needs it, useless here, usefull when receiveing an order -->
<!-- origquantityrec only here for javascript compatibility (additem.js needs it, useless here, useful when receiveing an order -->
<input id="origquantityrec" readonly="readonly" type="hidden" name="origquantityrec" value="1" />
</li>
<li>

2
koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/patrons.pref

@ -201,7 +201,7 @@ Patrons:
yes: Do
no: "Don't"
- track last patron activity.
- Everytime a patron will connect, the borrowers.lastseen will be updated with the current time.
- Every time a patron will connect, the borrowers.lastseen will be updated with the current time.
-
- Block a patron's account if it reaches
- pref: FailedLoginAttempts

2
koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2MODS.xsl

@ -428,7 +428,7 @@
<genre authority="marc">poetry</genre>
</xsl:if>
<xsl:if test="contains($controlField008-30-31,'r')">
<genre authority="marc">rehersal</genre>
<genre authority="marc">rehearsal</genre>
</xsl:if>
<xsl:if test="contains($controlField008-30-31,'g')">
<genre authority="marc">reporting</genre>

2
koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2intranetDetail.xsl

@ -149,7 +149,7 @@
<xsl:with-param name="codes">abc</xsl:with-param>
<xsl:with-param name="index">au</xsl:with-param>
<xsl:with-param name="UseAuthoritiesForTracings" select="$UseAuthoritiesForTracings"/>
<!-- do not use label 'by ' here, it would be repeated for every occurence of 100,110,111,700,710,711 -->
<!-- do not use label 'by ' here, it would be repeated for every occurrence of 100,110,111,700,710,711 -->
</xsl:call-template>
</h5>
</xsl:if>

6
koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-auth.tt

@ -26,7 +26,7 @@
<!--CONTENT-->
[% IF Koha.Preference( 'opacuserlogin' ) == 1 %]
[% IF ( nopermission ) %]
<!-- This is what is displayed if user doesnt have permission -->
<!-- This is what is displayed if user doesn't have permission -->
<div class="alert">
<h3>Access denied</h3>
<p>Sorry, the system doesn't think you have permission to access this page. </p>
@ -50,7 +50,7 @@
[% END %]
[% IF ( different_ip ) %]
<!-- This is what is displayed if user doesnt have permission -->
<!-- This is what is displayed if user doesn't have permission -->
<div class="alert alert-info">
<p>You are logging from a different IP address. Please log in again.</p>
</div>
@ -58,7 +58,7 @@
[% IF invalid_username_or_password || too_many_login_attempts %]
<!-- This is what is displayed if user doesnt have permission or account is locked. (Do not expose more information than needed.) -->
<!-- This is what is displayed if user doesn't have permission or account is locked. (Do not expose more information than needed.) -->
<div class="alert alert-info">
<p>You entered an incorrect username or password. Please try again! But note that passwords are case sensitive[% IF Koha.Preference('FailedLoginAttempts') %] and that your account will be locked out after a fixed number of failed login attempts[% END %]. Please contact a library staff member if you continue to have problems.</p>
</div>

6
koha-tmpl/opac-tmpl/bootstrap/en/modules/sco/sco-main.tt

@ -140,7 +140,7 @@
[% END # / IF confirm %]
[% IF ( nopermission ) %]
<!-- This is what is displayed if user doesnt have permission -->
<!-- This is what is displayed if user doesn't have permission -->
<div class="alert">
<h3>Access denied</h3>
<p>Sorry, this self-checkout station has lost authentication. Please contact the administrator to resolve this problem.</p>
@ -148,7 +148,7 @@
[% END %]
[% IF ( different_ip ) %]
<!-- This is what is displayed if user doesnt have permission -->
<!-- This is what is displayed if user doesn't have permission -->
<div class="alert">
<h3>Session lost</h3>
<p>You are accessing self-checkout from a different IP address! please log in again.</p>
@ -156,7 +156,7 @@
[% END %]
[% IF ( invalid_username_or_password ) %]
<!-- This is what is displayed if user doesnt have permission -->
<!-- This is what is displayed if user doesn't have permission -->
<div class="alert">
<h3>Record not found</h3>
<p>Your userid was not found in the database. Please try again.</p>

4
labels/label-manage.pl

@ -61,7 +61,7 @@ my $display_columns = { layout => [ # db column => {col label
{profile_id => {label => 'Profile ID', link_field => 0}},
{printer_name => {label => 'Printer Name', link_field => 0}},
{paper_bin => {label => 'Paper Bin', link_field => 0}},
{_template_code => {label => 'Template Name', link_field => 0}}, # this display column does not have a corrisponding db column in the profile table, hence the underscore
{_template_code => {label => 'Template Name', link_field => 0}}, # this display column does not have a corresponding db column in the profile table, hence the underscore
{select => {label => 'Actions', value => 'profile_id'}},
],
batch => [
@ -73,7 +73,7 @@ my $display_columns = { layout => [ # db column => {col label
],
};
my $label_element = $cgi->param('label_element') || 'template'; # default to template managment
my $label_element = $cgi->param('label_element') || 'template'; # default to template management
my $op = $cgi->param('op') || 'none';
my $element_id = $cgi->param('element_id') || undef;
my $error = $cgi->param('error') || 0;

2
misc/batchDeleteUnusedSubfields.pl

@ -30,7 +30,7 @@ if ($version || (!$confirm)) {
This script cleans unused subfields in the MARC DB.
If you alter the MARC parameters and remove a subfield (ie : move it to ignore (10) tab), existing subfields are NOT removed.
It's not a bug, it prevents deleting useful values in case of erroneous move.
This script definetly remove unused subfields in the MARC DB.
This script definitely remove unused subfields in the MARC DB.
syntax :
\t./cleanmarcdb.pl -h (or without arguments => shows this screen)
\t./cleanmarcdb.pl -c (c like confirm => cleans the marc DB (may be long)

2
misc/check_sysprefs.pl

@ -21,7 +21,7 @@ sub check_sys_pref {
if ( !-d _ ) {
my $name = $File::Find::name;
if ( $name =~ /(\.pl|\.pm)$/ ) {
open( FILE, "$_" ) || die "cant open $name";
open( FILE, "$_" ) || die "can't open $name";
while ( my $inp = <FILE> ) {
if ( $inp =~ /C4::Context->preference\((.*?)\)/ ) {
my $variable = $1;

2
opac/ilsdi.pl

@ -32,7 +32,7 @@ use CGI qw ( -utf8 );
This script is a basic implementation of ILS-DI protocol for Koha.
It acts like a dispatcher, that get the CGI request, check required and
optionals arguments, call a function from C4::ILS-DI, and finaly
optionals arguments, call a function from C4::ILS-DI, and finally
outputs the returned hashref as XML.
=cut

2
opac/opac-passwd.pl

@ -92,7 +92,7 @@ if ( C4::Context->preference("OpacPasswordChange") ) {
# Called Empty, Ask for data.
$template->param( 'Ask_data' => '1' );
if (!$query->param('Oldkey') && ($query->param('Newkey') || $query->param('Confirm'))){
# Old password is empty but one of the others isnt
# Old password is empty but one of the others isn't
$template->param( 'Error_messages' => '1' );
$template->param( 'WrongPass' => '1' );
}

2
opac/opac-reserve.pl

@ -496,7 +496,7 @@ foreach my $biblioNum (@biblionumbers) {
$itemInfo->{backgroundcolor} = 'other';
}
# Check of the transfered documents
# Check of the transferred documents
my ( $transfertwhen, $transfertfrom, $transfertto ) =
GetTransfers($itemNum);
if ( $transfertwhen && ($transfertwhen ne '') ) {

2
opac/opac-search.pl

@ -329,7 +329,7 @@ if ( $template_type && $template_type eq 'advsearch' ) {
# shouldn't appear on the first one, scan indexes should, adding a new
# box should only appear on the last, etc.
my @search_boxes_array;
my $search_boxes_count = 3; # begin whith 3 boxes
my $search_boxes_count = 3; # begin with 3 boxes
$template->param( search_boxes_count => $search_boxes_count );
if ($cgi->cookie("num_paragraph")){

2
opac/opac-sendbasket.pl

@ -186,7 +186,7 @@ END_OF_BODY
$template->param( SENT => "1" );
}
else {
# do something if it doesnt work....
# do something if it doesn't work....
carp "Error sending mail: empty basket" if !defined($iso2709);
carp "Error sending mail: $Mail::Sendmail::error" if $Mail::Sendmail::error;
$template->param( error => 1 );

2
opac/opac-sendshelf.pl

@ -188,7 +188,7 @@ END_OF_BODY
$template->param( SENT => "1" );
}
else {
# do something if it doesnt work....
# do something if it doesn't work....
carp "Error sending mail: $Mail::Sendmail::error \n";
$template->param( error => 1 );
}

4
patroncards/manage.pl

@ -44,7 +44,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
);
my $op = $cgi->param('op') || 'none';
my $card_element = $cgi->param('card_element') || 'template'; # default to template managment
my $card_element = $cgi->param('card_element') || 'template'; # default to template management
my $element_id = $cgi->param('element_id') || 0; # there should never be an element with a id of 0 so this is a safe default
my $db_rows = {};
@ -64,7 +64,7 @@ my $display_columns = { layout => [ # db column => {col label
profile => [ {profile_id => {label => 'Profile ID', link_field => 0}},
{printer_name => {label => 'Printer Name', link_field => 0}},
{paper_bin => {label => 'Paper Bin', link_field => 0}},
{_template_code => {label => 'Template Name', link_field => 0}}, # this display column does not have a corrisponding db column in the profile table, hence the underscore
{_template_code => {label => 'Template Name', link_field => 0}}, # this display column does not have a corresponding db column in the profile table, hence the underscore
{_action => {label => 'Action', link_field => 0}},
{select => {label => 'Select', value => 'profile_id'}},
],

2
reports/borrowers_stats.pl

@ -126,7 +126,7 @@ if ($do_it) {
$req->execute;
$template->param( SORT1_LOOP => $req->fetchall_arrayref({}));
$req = $dbh->prepare("SELECT DISTINCTROW sort2 AS value FROM borrowers WHERE sort2 IS NOT NULL AND sort2 <> '' ORDER BY sort2 LIMIT 200");
# More than 200 items in a dropdown is not going to be useful anyway, and w/ 50,000 patrons we can destory DB performance.
# More than 200 items in a dropdown is not going to be useful anyway, and w/ 50,000 patrons we can destroy DB performance.
$req->execute;
$template->param( SORT2_LOOP => $req->fetchall_arrayref({}));

8
reports/guided_reports.pl

@ -225,7 +225,7 @@ elsif ( $phase eq 'Update SQL'){
$cache_expiry *= 86400; # 60 * 60 * 24
}
}
# check $cache_expiry isnt too large, Memcached::set requires it to be less than 30 days or it will be treated as if it were an absolute time stamp
# check $cache_expiry isn't too large, Memcached::set requires it to be less than 30 days or it will be treated as if it were an absolute time stamp
if( $cache_expiry >= 2592000 ){
push @errors, {cache_expiry => $cache_expiry};
}
@ -322,7 +322,7 @@ elsif ( $phase eq 'Report on this Area' ) {
} elsif( $cache_expiry_units eq "days" ){
$cache_expiry *= 86400; # 60 * 60 * 24
}
# check $cache_expiry isnt too large, Memcached::set requires it to be less than 30 days or it will be treated as if it were an absolute time stamp
# check $cache_expiry isn't too large, Memcached::set requires it to be less than 30 days or it will be treated as if it were an absolute time stamp
if( $cache_expiry >= 2592000 ){ # oops, over the limit of 30 days
# report error to user
$template->param(
@ -334,7 +334,7 @@ elsif ( $phase eq 'Report on this Area' ) {
'public' => scalar $input->param('public'),
);
} else {
# they have choosen a new report and the area to report on
# they have chosen a new report and the area to report on
$template->param(
'build2' => 1,
'area' => scalar $input->param('area'),
@ -586,7 +586,7 @@ elsif ( $phase eq 'Save Report' ) {
$cache_expiry *= 86400; # 60 * 60 * 24
}
}
# check $cache_expiry isnt too large, Memcached::set requires it to be less than 30 days or it will be treated as if it were an absolute time stamp
# check $cache_expiry isn't too large, Memcached::set requires it to be less than 30 days or it will be treated as if it were an absolute time stamp
if( $cache_expiry && $cache_expiry >= 2592000 ){
push @errors, {cache_expiry => $cache_expiry};
}

2
reserve/request.pl

@ -452,7 +452,7 @@ foreach my $biblionumber (@biblionumbers) {
# for branches they arent logged in to
if ( C4::Context->preference("IndependentBranches") ) {
if (! C4::Context->preference("canreservefromotherbranches")){
# cant reserve items so need to check if item homebranch and userenv branch match if not we cant reserve
# can't reserve items so need to check if item homebranch and userenv branch match if not we can't reserve
my $userenv = C4::Context->userenv;
unless ( C4::Context->IsSuperLibrarian ) {
$item->{cantreserve} = 1 if ( $item->{homebranch} ne $userenv->{branch} );

2
serials/routing-preview.pl

@ -16,7 +16,7 @@
# along with Koha; if not, see <http://www.gnu.org/licenses>.
# Routing Preview.pl script used to view a routing list after creation
# lets one print out routing slip and create (in this instance) the heirarchy
# lets one print out routing slip and create (in this instance) the hierarchy
# of reserves for the serial
use Modern::Perl;
use CGI qw ( -utf8 );

2
serials/subscription-detail.pl

@ -45,7 +45,7 @@ if ( $op and $op eq "close" ) {
C4::Serials::ReopenSubscription( $subscriptionid );
}
# the subscription must be deletable if there is NO issues for a reason or another (should not happend, but...)
# the subscription must be deletable if there is NO issues for a reason or another (should not happened, but...)
# Permission needed if it is a deletion (del) : delete_subscription
# Permission needed otherwise : *

Loading…
Cancel
Save