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

(-)a/t/db_dependent/selenium/basic_workflow.t (-14 lines)
Lines 132-141 SKIP: { Link Here
132
132
133
    my $itemtype = $sample_data->{itemtype};
133
    my $itemtype = $sample_data->{itemtype};
134
134
135
    my $homelibrary = $sample_data->{homelibrary};
136
137
    my $currentlibrary = $sample_data->{currentlibrary};
138
139
    my @biblionumbers;
135
    my @biblionumbers;
140
    for my $i ( 1 .. $number_of_biblios_to_insert ) {
136
    for my $i ( 1 .. $number_of_biblios_to_insert ) {
141
        my $biblio = MARC::Record->new();
137
        my $biblio = MARC::Record->new();
Lines 145-160 SKIP: { Link Here
145
                MARC::Field->new('200', ' ', ' ', a => 'test biblio '.$i),
141
                MARC::Field->new('200', ' ', ' ', a => 'test biblio '.$i),
146
                MARC::Field->new('200', ' ', ' ', f => 'test author '.$i),
142
                MARC::Field->new('200', ' ', ' ', f => 'test author '.$i),
147
                MARC::Field->new('200', ' ', ' ', b => $itemtype->{itemtype}),
143
                MARC::Field->new('200', ' ', ' ', b => $itemtype->{itemtype}),
148
                MARC::Field->new('200', ' ', ' ', c => $homelibrary->{homelibrary}),
149
                MARC::Field->new('200', ' ', ' ', d => $currentlibrary->{currentlibrary}),
150
            );
144
            );
151
        } else {
145
        } else {
152
            $biblio->append_fields(
146
            $biblio->append_fields(
153
                MARC::Field->new('245', ' ', ' ', a => 'test biblio '.$i),
147
                MARC::Field->new('245', ' ', ' ', a => 'test biblio '.$i),
154
                MARC::Field->new('100', ' ', ' ', a => 'test author '.$i),
148
                MARC::Field->new('100', ' ', ' ', a => 'test author '.$i),
155
                MARC::Field->new('942', ' ', ' ', c => $itemtype->{itemtype}),
149
                MARC::Field->new('942', ' ', ' ', c => $itemtype->{itemtype}),
156
                MARC::Field->new('942', ' ', ' ', b => $homelibrary->{homelibrary}),
157
                MARC::Field->new('942', ' ', ' ', d => $currentlibrary->{currentlibrary}),
158
            );
150
            );
159
        }
151
        }
160
        my ($biblionumber, $biblioitemnumber) = AddBiblio($biblio, '');
152
        my ($biblionumber, $biblioitemnumber) = AddBiblio($biblio, '');
Lines 219-229 SKIP: { Link Here
219
            ) {
211
            ) {
220
                next; # auto-filled
212
                next; # auto-filled
221
            }
213
            }
222
            elsif (
223
                $id =~ m|^tag_952_subfield_a| # homelibrary
224
            ) {
225
            elsif ( =~ m|^tag_952_subfield_b| # currentlibrary
226
            ) {
227
            elsif (
214
            elsif (
228
                $id =~ m|^tag_952_subfield_d| # dateaccessioned
215
                $id =~ m|^tag_952_subfield_d| # dateaccessioned
229
            ) {
216
            ) {
230
- 

Return to bug 33419