+ unless (opendir( MYDIR, $dir )) {
+ if ($langchoice eq 'en') {
+ warn "cannot open MARC frameworks directory $dir";
+ } else {
+ # if no translated MARC framework is available,
+ # default to English
+ $dir = C4::Context->config('intranetdir') . "/installer/data/$info{dbms}/en/marcflavour/".lc($marcflavour);
+ opendir(MYDIR, $dir) or warn "cannot open English MARC frameworks directory $dir";
+ $template->param('en_marc_frameworks' => 1);
+ }
+ }