Changeset 11995 for trunk/gsdl/perllib
- Timestamp:
- 2006-07-04T15:07:11+12:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/ArcPlug.pm
r10478 r11995 144 144 my $process_file = 0; 145 145 146 if ( $processor->get_mode() eq "infodb") {146 if (!$processor->is_incremental_capable() || !$self->{'keepold'}) { 147 147 $process_file = 1; 148 148 } 149 149 else { 150 if (!$processor->is_incremental_capable() || !$self->{'keepold'}) { 150 # is incremental 151 152 # check to see if file needs to be indexed 153 $index_status = $archive_info->get_status_info($doc_oid); 154 155 if ($index_status eq "I") { 151 156 $process_file = 1; 152 157 } 153 else {154 # is incremental155 156 # check to see if file needs to be indexed157 $index_status = $archive_info->get_status_info($doc_oid);158 159 if ($index_status eq "I") {160 $process_file = 1;161 }162 }163 158 } 164 165 159 166 160 if ($process_file) {
Note:
See TracChangeset
for help on using the changeset viewer.