|
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 |
- |
|
|