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

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

Return to bug 18736