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

(-)a/t/db_dependent/Breeding.t (-4 / +3 lines)
Lines 295-306 sub test_add_custom_field_rowdata { Link Here
295
295
296
    is( $returned_row->{title}, "Just a title", "_add_rowdata returns the title of a biblio" );
296
    is( $returned_row->{title}, "Just a title", "_add_rowdata returns the title of a biblio" );
297
    is(
297
    is(
298
        $returned_row->{addnumberfields}[0], "245\$a",
298
        $returned_row->{addnumberfields}[1], "245",
299
        "_add_rowdata returns the field number chosen in the AdditionalFieldsInZ3950ResultSearch preference"
299
        "_add_rowdata returns the field number chosen in the AdditionalFieldsInZ3950ResultSearch preference"
300
    );
300
    );
301
301
302
    # Test repeatble tags,the trailing whitespace is a normal side-effect of _add_custom_field_row_data
302
    # Test repeatable tags
303
    is_deeply( \$returned_row->{"035\$a"}, \[ "First 035 ", "Second 035 " ], "_add_rowdata supports repeatable tags" );
303
    is_deeply( $returned_row->{"035"}, [ "[a]First 035", "[a]Second 035" ], "_add_rowdata supports repeatable tags" );
304
304
305
    warning_is { C4::Breeding::_add_custom_field_rowdata( $row, $biblio, undef ) } undef,
305
    warning_is { C4::Breeding::_add_custom_field_rowdata( $row, $biblio, undef ) } undef,
306
        'no warn from add_custom_field_rowdata when pref_newtags undef';
306
        'no warn from add_custom_field_rowdata when pref_newtags undef';
307
- 

Return to bug 40017