View | Details | Raw Unified | Return to bug 30930
Collapse All | Expand All

(-)a/authorities/authorities.pl (-13 / +17 lines)
Lines 631-649 if ($op eq "add") { Link Here
631
        }
631
        }
632
                exit;
632
                exit;
633
} else {
633
} else {
634
if ($op eq "duplicate")
634
    if ( $op eq "duplicate" ) {
635
        {
635
        $authid = "";
636
                $authid = "";
636
    }
637
        }
638
        if($changed_authtype eq "changed"){
639
            $record = TransformHtmlToMarc( $input, 0 );
640
        }
641
637
642
        build_tabs ($template, $record, $dbh, $input);
638
    if ( $changed_authtype eq "changed" ) {
643
        build_hidden_data;
639
        $record = TransformHtmlToMarc( $input, 0 );
644
        $template->param(oldauthtypetagfield=>$oldauthtypetagfield, oldauthtypetagsubfield=>$oldauthtypetagsubfield,
640
    }
645
                        oldauthnumtagfield=>$oldauthnumtagfield, oldauthnumtagsubfield=>$oldauthnumtagsubfield,
641
646
                        authid                      => $authid , authtypecode=>$authtypecode,	);
642
    build_tabs( $template, $record, $dbh, $input );
643
    build_hidden_data;
644
    $template->param(
645
        oldauthtypetagfield    => $oldauthtypetagfield,
646
        oldauthtypetagsubfield => $oldauthtypetagsubfield,
647
        oldauthnumtagfield     => $oldauthnumtagfield,
648
        oldauthnumtagsubfield  => $oldauthnumtagsubfield,
649
        authid                 => $authid,
650
        authtypecode           => $authtypecode,
651
    );
647
}
652
}
648
653
649
my $authority_types = Koha::Authority::Types->search( {}, { order_by => ['authtypetext'] } );
654
my $authority_types = Koha::Authority::Types->search( {}, { order_by => ['authtypetext'] } );
650
- 

Return to bug 30930