Lines 823-829
$is_a_modif = 0;
Link Here
|
823 |
|
823 |
|
824 |
if ($biblionumber) { |
824 |
if ($biblionumber) { |
825 |
$is_a_modif = 1; |
825 |
$is_a_modif = 1; |
826 |
$template->param( title => $record->title(), ); |
826 |
my $title = C4::Context->preference('marcflavour') eq "UNIMARC" ? $record->subfield('200', 'a') : $record->title; |
|
|
827 |
$template->param( title => $title ); |
827 |
|
828 |
|
828 |
# if it's a modif, retrieve bibli and biblioitem numbers for the future modification of old-DB. |
829 |
# if it's a modif, retrieve bibli and biblioitem numbers for the future modification of old-DB. |
829 |
( $biblionumbertagfield, $biblionumbertagsubfield ) = |
830 |
( $biblionumbertagfield, $biblionumbertagsubfield ) = |
Lines 912-919
if ( $op eq "addbiblio" ) {
Link Here
|
912 |
done =>1, |
913 |
done =>1, |
913 |
popup =>1 |
914 |
popup =>1 |
914 |
); |
915 |
); |
915 |
$template->param( title => $record->subfield('200',"a") ) if ($record ne "-1" && C4::Context->preference('marcflavour') =~/unimarc/i); |
916 |
if ( $record ne '-1' ) { |
916 |
$template->param( title => $record->title() ) if ($record ne "-1" && C4::Context->preference('marcflavour') eq "usmarc"); |
917 |
my $title = C4::Context->preference('marcflavour') eq "UNIMARC" ? $record->subfield('200', 'a') : $record->title; |
|
|
918 |
$template->param( title => $title ); |
919 |
} |
917 |
$template->param( |
920 |
$template->param( |
918 |
popup => $mode, |
921 |
popup => $mode, |
919 |
itemtype => $frameworkcode, |
922 |
itemtype => $frameworkcode, |
Lines 983-989
elsif ( $op eq "delete" ) {
Link Here
|
983 |
); |
986 |
); |
984 |
} |
987 |
} |
985 |
|
988 |
|
986 |
$template->param( title => $record->title() ) if ( $record ne "-1" ); |
989 |
if ( $record ne '-1' ) { |
|
|
990 |
my $title = C4::Context->preference('marcflavour') eq "UNIMARC" ? $record->subfield('200', 'a') : $record->title; |
991 |
$template->param( title => $title ); |
992 |
} |
987 |
$template->param( |
993 |
$template->param( |
988 |
popup => $mode, |
994 |
popup => $mode, |
989 |
frameworkcode => $frameworkcode, |
995 |
frameworkcode => $frameworkcode, |