diff --git a/cataloguing/addbiblio.pl b/cataloguing/addbiblio.pl index f91b3060fe..1db6677fec 100755 --- a/cataloguing/addbiblio.pl +++ b/cataloguing/addbiblio.pl @@ -489,14 +489,15 @@ sub build_tabs { # ======================== # MAIN #========================= -my $input = CGI->new; -my $error = $input->param('error'); -my $biblionumber = $input->param('biblionumber'); # if biblionumber exists, it's a modif, not a new biblio. -my $parentbiblio = $input->param('parentbiblionumber'); -my $breedingid = $input->param('breedingid'); -my $z3950 = $input->param('z3950'); -my $mode = $input->param('mode') // q{}; -my $frameworkcode = $input->param('frameworkcode'); +my $input = CGI->new; +my $error = $input->param('error'); +my $biblionumber = $input->param('biblionumber'); # if biblionumber exists, it's a modif, not a new biblio. +my $parentbiblio = $input->param('parentbiblionumber'); +my $breedingid = $input->param('breedingid'); +my $z3950 = $input->param('z3950'); +my $mode = $input->param('mode') // q{}; +my $frameworkcode = $input->param('frameworkcode'); +$frameworkcode = '' if ( $frameworkcode eq 'Default' ); my $redirect = $input->param('redirect'); my $searchid = $input->param('searchid') // ""; my $dbh = C4::Context->dbh; @@ -534,8 +535,6 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( } ); -$frameworkcode = '' if ( $frameworkcode eq 'Default' ); - # Set default values for global variable $tagslib = &GetMarcStructure( 1, $frameworkcode ); $usedTagsLib = &GetUsedMarcStructure($frameworkcode);