Attachment 104664 Details for Bug 4985 – Bug 4985: Fix Plack scope errors

[patch] Bug 4985: Fix Plack scope errors

0001-Bug-4985-Fix-Plack-scope-errors.patch (text/plain), 3.26 KB, created by Emmi Takkinen on 2020-05-11 09:29:01 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Emmi Takkinen

Created: 2020-05-11 09:29:01 UTC

Size: 3.26 KB

patch

obsolete

>From b98b446bb68d19dc05d837fe7cdf46379718b979 Mon Sep 17 00:00:00 2001
>From: Emmi Takkinen <emmi.takkinen@outlook.com>
>Date: Thu, 19 Mar 2020 09:12:19 +0200
>Subject: [PATCH] Bug 4985: Fix Plack scope errors
>
>This patch 'ours' several variables to fix Plack scope errors
>in exceptionHolidays.pl.
>
>This also adds '@holidays_list' as parameter to 'edit_holidays'.
>
>Sponsored-by: Koha-Suomi Oy
>---
> tools/exceptionHolidays.pl | 26 +++++++++++++-------------
> 1 file changed, 13 insertions(+), 13 deletions(-)
>
>diff --git a/tools/exceptionHolidays.pl b/tools/exceptionHolidays.pl
>index 680fe17130..7095157617 100755
>--- a/tools/exceptionHolidays.pl
>+++ b/tools/exceptionHolidays.pl
>@@ -17,18 +17,18 @@ my $dbh = C4::Context->dbh();
> checkauth($input, 0, {tools=> 'edit_calendar'}, 'intranet');
> 
> 
>-my $branchcode = $input->param('showBranchName');
>+our $branchcode = $input->param('showBranchName');
> my $originalbranchcode  = $branchcode;
>-my $weekday = $input->param('showWeekday');
>-my $day = $input->param('showDay');
>-my $month = $input->param('showMonth');
>-my $year = $input->param('showYear');
>-my $title = $input->param('showTitle');
>-my $description = $input->param('showDescription');
>-my $holidaytype = $input->param('showHolidayType');
>+our $weekday = $input->param('showWeekday');
>+our $day = $input->param('showDay');
>+our $month = $input->param('showMonth');
>+our $year = $input->param('showYear');
>+our $title = $input->param('showTitle');
>+our $description = $input->param('showDescription');
>+our $holidaytype = $input->param('showHolidayType');
> my $datecancelrange_dt = eval { dt_from_string( scalar $input->param('datecancelrange') ) };
> my $calendardate = sprintf("%04d-%02d-%02d", $year, $month, $day);
>-my $showoperation = $input->param('showOperation');
>+our $showoperation = $input->param('showOperation');
> my $allbranches = $input->param('allBranches');
> 
> $title || ($title = '');
>@@ -40,7 +40,7 @@ if ($description) {
> }   
> 
> # We make an array with holiday's days
>-my @holiday_list;
>+our @holiday_list;
> if ($datecancelrange_dt){
>             my $first_dt = DateTime->new(year => $year, month  => $month,  day => $day);
> 
>@@ -55,16 +55,16 @@ if ($datecancelrange_dt){
> if($allbranches) {
>     my $libraries = Koha::Libraries->search;
>     while ( my $library = $libraries->next ) {
>-        edit_holiday($showoperation, $library->branchcode, $weekday, $day, $month, $year, $title, $description, $holidaytype);
>+        edit_holiday($showoperation, $library->branchcode, $weekday, $day, $month, $year, $title, $description, $holidaytype, @holiday_list);
>     }
> } else {
>-    edit_holiday($showoperation, $branchcode, $weekday, $day, $month, $year, $title, $description, $holidaytype);
>+    edit_holiday($showoperation, $branchcode, $weekday, $day, $month, $year, $title, $description, $holidaytype, @holiday_list);
> }
> 
> print $input->redirect("/cgi-bin/koha/tools/holidays.pl?branch=$originalbranchcode&calendardate=$calendardate");
> 
> sub edit_holiday {
>-    ($showoperation, $branchcode, $weekday, $day, $month, $year, $title, $description, $holidaytype) = @_;
>+    ($showoperation, $branchcode, $weekday, $day, $month, $year, $title, $description, $holidaytype, @holiday_list) = @_;
>     my $calendar = C4::Calendar->new(branchcode => $branchcode);
> 
>     if ($showoperation eq 'exception') {
>-- 
>2.17.1
>

Actions: View | Diff | Splinter Review

Attachments on bug 4985: 98556 | 98565 | 98620 | 100880 | 100994 | 104664 | 104949 | 104950 | 106129 | 106130