From c835cc1ca780532f9bb06973eb1a05c0ad85b21c Mon Sep 17 00:00:00 2001 From: Nahuel ANGELINETTI Date: Tue, 20 Jan 2009 15:59:23 +0100 Subject: [PATCH] Autoselect marcflavour in marc import This patch is writted by Paul Poulain. It auto-select the marcflavour from syspref in the stage marc import. Signed-off-by: Henri-Damien LAURENT --- .../prog/en/modules/tools/stage-marc-import.tmpl | 6 +++++- tools/stage-marc-import.pl | 3 +++ 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/stage-marc-import.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/stage-marc-import.tmpl index e040b5ab64..e47a12e86f 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/stage-marc-import.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/stage-marc-import.tmpl @@ -86,7 +86,11 @@ function CheckForm(f) {
  • - + + + + +
  • diff --git a/tools/stage-marc-import.pl b/tools/stage-marc-import.pl index 9c09d8c06d..ea2e82515b 100755 --- a/tools/stage-marc-import.pl +++ b/tools/stage-marc-import.pl @@ -183,6 +183,9 @@ if ($completedJobID) { } else { # initial form + if (C4::Context->preference("marcflavour") eq "UNIMARC") { + $template->param("UNIMARC" => 1); + } my @matchers = C4::Matcher::GetMatcherList(); $template->param(available_matchers => \@matchers); } -- 2.39.5