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

(-)a/cataloguing/addbiblio.pl (-4 / +10 lines)
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,
(-)a/cataloguing/additem.pl (-2 lines)
Lines 847-853 foreach my $tag ( keys %{$tagslib}){ Link Here
847
@loop_data = sort {$a->{subfield} cmp $b->{subfield} } @loop_data;
847
@loop_data = sort {$a->{subfield} cmp $b->{subfield} } @loop_data;
848
848
849
# what's the next op ? it's what we are not in : an add if we're editing, otherwise, and edit.
849
# what's the next op ? it's what we are not in : an add if we're editing, otherwise, and edit.
850
$template->param( title => $record->title() ) if ($record ne "-1");
851
$template->param(
850
$template->param(
852
    biblionumber => $biblionumber,
851
    biblionumber => $biblionumber,
853
    title        => $oldrecord->{title},
852
    title        => $oldrecord->{title},
854
- 

Return to bug 13635