|
Lines 33-38
use Koha::DateUtils;
Link Here
|
| 33 |
my $input = new CGI; |
33 |
my $input = new CGI; |
| 34 |
my $dbh = C4::Context->dbh(); |
34 |
my $dbh = C4::Context->dbh(); |
| 35 |
|
35 |
|
|
|
36 |
checkauth($input, 0, {tools=> 'edit_calendar'}, 'intranet'); |
| 37 |
|
| 36 |
our $branchcode = $input->param('newBranchName'); |
38 |
our $branchcode = $input->param('newBranchName'); |
| 37 |
my $originalbranchcode = $branchcode; |
39 |
my $originalbranchcode = $branchcode; |
| 38 |
our $weekday = $input->param('newWeekday'); |
40 |
our $weekday = $input->param('newWeekday'); |
| 39 |
- |
|
|