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

(-)a/C4/AuthoritiesMarc.pm (-7 / +6 lines)
Lines 556-562 sub AddAuthority { Link Here
556
    if ($format eq "MARC21") {
556
    if ($format eq "MARC21") {
557
        my $userenv = C4::Context->userenv;
557
        my $userenv = C4::Context->userenv;
558
        my $library;
558
        my $library;
559
        my $marcorgcode = C4::Context->preference('MARCOrgCode');
559
        my $marcorgcode = C4::Context->preference('MARCOrgCode') // q{};
560
        if ( $userenv && $userenv->{'branch'} ) {
560
        if ( $userenv && $userenv->{'branch'} ) {
561
            $library = Koha::Libraries->find( $userenv->{'branch'} );
561
            $library = Koha::Libraries->find( $userenv->{'branch'} );
562
            # userenv's library could not exist because of a trick in misc/commit_file.pl (see FIXME and set_userenv statement)
562
            # userenv's library could not exist because of a trick in misc/commit_file.pl (see FIXME and set_userenv statement)
Lines 565-575 sub AddAuthority { Link Here
565
		if (!$record->leader) {
565
		if (!$record->leader) {
566
			$record->leader($leader);
566
			$record->leader($leader);
567
		}
567
		}
568
		if (!$record->field('003')) {
568
569
			$record->insert_fields_ordered(
569
        # Always update 003
570
                MARC::Field->new('003', $marcorgcode),
570
        $record->delete_field( $record->field('003') );
571
			);
571
        $record->insert_fields_ordered( MARC::Field->new('003', $marcorgcode) );
572
		}
572
573
		my $date=POSIX::strftime("%y%m%d",localtime);
573
		my $date=POSIX::strftime("%y%m%d",localtime);
574
		if (!$record->field('008')) {
574
		if (!$record->field('008')) {
575
            # Get a valid default value for field 008
575
            # Get a valid default value for field 008
576
- 

Return to bug 28491