Lines 183-188
SKIP: {
Link Here
|
183 |
my $id = $input->get_attribute('id'); |
183 |
my $id = $input->get_attribute('id'); |
184 |
next unless $id =~ m|^tag_952_subfield|; |
184 |
next unless $id =~ m|^tag_952_subfield|; |
185 |
|
185 |
|
|
|
186 |
my $effective_input = $input; |
186 |
my $v; |
187 |
my $v; |
187 |
|
188 |
|
188 |
# FIXME This is based on default values |
189 |
# FIXME This is based on default values |
Lines 201-206
SKIP: {
Link Here
|
201 |
$id =~ m|^tag_952_subfield_w| # replacementpricedate |
202 |
$id =~ m|^tag_952_subfield_w| # replacementpricedate |
202 |
) { |
203 |
) { |
203 |
$v = strftime("%Y-%m-%d", localtime); |
204 |
$v = strftime("%Y-%m-%d", localtime); |
|
|
205 |
$effective_input = $driver->find_element('//div[@id="subfield952w"]/input[@class="input_marceditor flatpickr-input"]'); |
204 |
} |
206 |
} |
205 |
elsif ( |
207 |
elsif ( |
206 |
$id =~ m|^tag_952_subfield_d| # dateaccessioned |
208 |
$id =~ m|^tag_952_subfield_d| # dateaccessioned |
Lines 215-221
SKIP: {
Link Here
|
215 |
else { |
217 |
else { |
216 |
$v = 't_value_bib' . $biblionumber; |
218 |
$v = 't_value_bib' . $biblionumber; |
217 |
} |
219 |
} |
218 |
$input->send_keys( $v ); |
220 |
$effective_input->send_keys( $v ); |
219 |
} |
221 |
} |
220 |
|
222 |
|
221 |
$driver->find_element('//input[@name="add_submit"]')->click; |
223 |
$driver->find_element('//input[@name="add_submit"]')->click; |
222 |
- |
|
|