Changeset 27917 for main/trunk/greenstone2/perllib/basebuildproc.pm
- Timestamp:
- 2013-07-22T15:07:30+12:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/basebuildproc.pm
r27306 r27917 717 717 foreach my $metadata_value (@metadata_values) { 718 718 if ($bool eq '!') { 719 if ( $options =~ /^i$/i) {719 if (defined $options && $options =~ /^i$/i) { 720 720 if ($metadata_value !~ /$exp/i) {$indexed_doc = 1; last;} 721 721 } else { … … 723 723 } 724 724 } else { 725 if ( $options =~ /^i$/i) {725 if (defined $options && $options =~ /^i$/i) { 726 726 if ($metadata_value =~ /$exp/i) {$indexed_doc = 1; last;} 727 727 } else {
Note:
See TracChangeset
for help on using the changeset viewer.