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

(-)a/C4/XSLT.pm (-8 / +12 lines)
Lines 85-97 sub transformMARCXML4XSLT { Link Here
85
                    $value = GetAuthorisedValueDesc( $tag, $letter, $value, '', $tagslib )
85
                    $value = GetAuthorisedValueDesc( $tag, $letter, $value, '', $tagslib )
86
                        if $av->{ $tag }->{ $letter };
86
                        if $av->{ $tag }->{ $letter };
87
                    push( @new_subfields, $letter, $value );
87
                    push( @new_subfields, $letter, $value );
88
                } 
88
                }
89
                $field ->replace_with( MARC::Field->new(
89
                if (@new_subfields) {
90
                    $tag,
90
                    $field ->replace_with( MARC::Field->new(
91
                    $field->indicator(1),
91
                        $tag,
92
                    $field->indicator(2),
92
                        $field->indicator(1),
93
                    @new_subfields
93
                        $field->indicator(2),
94
                ) );
94
                        @new_subfields
95
                    ) );
96
                }
97
                else {
98
                    $record->delete_fields($field);
99
                }
95
            }
100
            }
96
        }
101
        }
97
    }
102
    }
98
- 

Return to bug 11592