Lines 229-234
elsif ( $step && $step == 3 ) {
Link Here
|
229 |
# Framework Selection is achieved through checking boxes. |
229 |
# Framework Selection is achieved through checking boxes. |
230 |
my $langchoice = $query->param('fwklanguage'); |
230 |
my $langchoice = $query->param('fwklanguage'); |
231 |
$langchoice = $query->cookie('KohaOpacLanguage') unless ($langchoice); |
231 |
$langchoice = $query->cookie('KohaOpacLanguage') unless ($langchoice); |
|
|
232 |
$langchoice =~ s/[^a-zA-Z_-]*//g; |
232 |
my $marcflavour = $query->param('marcflavour'); |
233 |
my $marcflavour = $query->param('marcflavour'); |
233 |
if ($marcflavour){ |
234 |
if ($marcflavour){ |
234 |
$installer->set_marcflavour_syspref($marcflavour); |
235 |
$installer->set_marcflavour_syspref($marcflavour); |
Lines 266-271
elsif ( $step && $step == 3 ) {
Link Here
|
266 |
# Marcflavour Selection is achieved through radiobuttons. |
267 |
# Marcflavour Selection is achieved through radiobuttons. |
267 |
my $langchoice = $query->param('fwklanguage'); |
268 |
my $langchoice = $query->param('fwklanguage'); |
268 |
$langchoice = $query->cookie('KohaOpacLanguage') unless ($langchoice); |
269 |
$langchoice = $query->cookie('KohaOpacLanguage') unless ($langchoice); |
|
|
270 |
$langchoice =~ s/[^a-zA-Z_-]*//g; |
269 |
my $dir = |
271 |
my $dir = |
270 |
C4::Context->config('intranetdir') . "/installer/data/$info{dbms}/$langchoice/marcflavour"; |
272 |
C4::Context->config('intranetdir') . "/installer/data/$info{dbms}/$langchoice/marcflavour"; |
271 |
unless (opendir( MYDIR, $dir )) { |
273 |
unless (opendir( MYDIR, $dir )) { |
272 |
- |
|
|