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

(-)a/C4/Biblio.pm (-2 / +1 lines)
Lines 3331-3337 sub ModBiblioMarc { Link Here
3331
    my $userenv = C4::Context->userenv;
3331
    my $userenv = C4::Context->userenv;
3332
    if ($userenv) {
3332
    if ($userenv) {
3333
        my $borrowernumber = $userenv->{number};
3333
        my $borrowernumber = $userenv->{number};
3334
        my $borrowername = join ' ', @$userenv{qw(firstname surname)};
3334
        my $borrowername = join ' ', map { $_ // q{} } @$userenv{qw(firstname surname)};
3335
        unless ($m_rs->in_storage) {
3335
        unless ($m_rs->in_storage) {
3336
            Koha::Util::MARC::set_marc_field($record, C4::Context->preference('MarcFieldForCreatorId'), $borrowernumber);
3336
            Koha::Util::MARC::set_marc_field($record, C4::Context->preference('MarcFieldForCreatorId'), $borrowernumber);
3337
            Koha::Util::MARC::set_marc_field($record, C4::Context->preference('MarcFieldForCreatorName'), $borrowername);
3337
            Koha::Util::MARC::set_marc_field($record, C4::Context->preference('MarcFieldForCreatorName'), $borrowername);
3338
- 

Return to bug 18736