Changeset 23371 for main/trunk/greenstone2/perllib/basebuildproc.pm
- Timestamp:
- 2010-12-02T00:36:37+13:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/basebuildproc.pm
r23182 r23371 516 516 517 517 # special case for URL metadata 518 if ($field =~ /^URL$/i) { 519 &dbutil::write_infodb_entry($self->{'infodbtype'}, $infodb_handle, $value, { 'section' => [ $section_OID ] }); 518 if ($field =~ m/^URL$/i) { 519 &dbutil::write_infodb_entry($self->{'infodbtype'}, $infodb_handle, 520 $value, { 'section' => [ $section_OID ] }); 520 521 } 521 522
Note:
See TracChangeset
for help on using the changeset viewer.