|
Lines 82-87
elsif ( $op eq 'add_validate' ) {
Link Here
|
| 82 |
my $location = $cgi->param('location'); |
82 |
my $location = $cgi->param('location'); |
| 83 |
my $code = $cgi->param('code'); |
83 |
my $code = $cgi->param('code'); |
| 84 |
my $branchcode = $cgi->param('branchcode') || undef; |
84 |
my $branchcode = $cgi->param('branchcode') || undef; |
|
|
85 |
my $idnew = $cgi->param('idnew'); |
| 85 |
|
86 |
|
| 86 |
my @lang = $cgi->multi_param('lang'); |
87 |
my @lang = $cgi->multi_param('lang'); |
| 87 |
|
88 |
|
|
Lines 92-97
elsif ( $op eq 'add_validate' ) {
Link Here
|
| 92 |
my $published_on = dt_from_string( scalar $cgi->param('published_on') ); |
93 |
my $published_on = dt_from_string( scalar $cgi->param('published_on') ); |
| 93 |
my $number = $cgi->param('number'); |
94 |
my $number = $cgi->param('number'); |
| 94 |
|
95 |
|
|
|
96 |
my $original_default = $idnew ? Koha::AdditionalContents->find($idnew) : undef; |
| 97 |
|
| 95 |
my $success = 1; |
98 |
my $success = 1; |
| 96 |
for my $lang ( sort {$a ne 'default'} @lang ) { # Process 'default' first |
99 |
for my $lang ( sort {$a ne 'default'} @lang ) { # Process 'default' first |
| 97 |
my $title = $cgi->param( 'title_' . $lang ); |
100 |
my $title = $cgi->param( 'title_' . $lang ); |
|
Lines 100-106
elsif ( $op eq 'add_validate' ) {
Link Here
|
| 100 |
{ |
103 |
{ |
| 101 |
category => $category, |
104 |
category => $category, |
| 102 |
code => $code, |
105 |
code => $code, |
| 103 |
branchcode => $branchcode, |
106 |
branchcode => $original_default ? $original_default->branchcode : $branchcode, |
| 104 |
lang => $lang, |
107 |
lang => $lang, |
| 105 |
} |
108 |
} |
| 106 |
); |
109 |
); |
| 107 |
- |
|
|