Changeset 17575
- Timestamp:
- 2008-10-23T10:01:25+13:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/lucenebuilder.pm
r17566 r17575 82 82 # /** new() **/ 83 83 84 sub init_for_incremental_build { 85 my $self = shift (@_); 86 87 # we want to read in indexfieldmap and indexfields from existing build.cfg 88 # so that we know what has already been indexed 89 my $buildcfg = $self->read_build_cfg(); 90 return unless defined $buildcfg; 91 92 my $field; 93 if (defined $buildcfg->{'indexfields'}) { 94 foreach $field (@{$buildcfg->{'indexfields'}}) { 95 $self->{'buildproc'}->{'indexfields'}->{$field} = 1; 96 } 97 } 98 99 if (defined $buildcfg->{'indexfieldmap'}) { 100 foreach $field (@{$buildcfg->{'indexfieldmap'}}) { 101 my ($f, $v) = $field =~ /^(.*)\-\>(.*)$/; 102 $self->{'buildproc'}->{'indexfieldmap'}->{$f} = $v; 103 } 104 } 105 106 } 107 84 108 # lucene has none of these options 85 109 sub generate_index_options { … … 109 133 my ($textindex) = @_; 110 134 my $outhandle = $self->{'outhandle'}; 111 print STDERR "Saving the document text\n"; 135 112 136 # the text directory 113 137 my $text_dir = &util::filename_cat($self->{'build_dir'}, "text");
Note:
See TracChangeset
for help on using the changeset viewer.