Changeset 12909

Timestamp:

2006-09-28T16:42:00+12:00 (18 years ago)

Author:

kjdon

Message:

now uses colcfg to write out the build file rather than reimplementing it itself. also added stemindexes field to buildcfg - indicates which stem indexes have been built for the collection

File:

• trunk/gsdl/perllib/basebuilder.pm (modified) (5 diffs)

trunk/gsdl/perllib/basebuilder.pm

@@ -127 +127 @@
     
     $self->generate_index_list();
-    
+    $self->generate_index_options();
+
     # sort out subcollection indexes
     if (defined $self->{'collect_cfg'}->{'indexsubcollections'}) {
@@ -251 +252 @@
     # and their directory names (includes subcolls and langs)
     $self->{'index_mapping'} = $self->create_index_mapping ($indexes);
-
+   
     # build each of the indexes
     foreach my $index (@$indexes) {
@@ -403 +404 @@
     $build_cfg->{'buildtype'} = $self->{'buildtype'};
     $build_cfg->{'indexstem'} = $self->{'collection'};
+    $build_cfg->{'stemindexes'} = $self->{'stemindexes'};
+    
     # store the number of documents and number of bytes
     $build_cfg->{'numdocs'} = $self->{'buildproc'}->get_num_docs();
@@ -442 +445 @@
     $self->build_cfg_extra($build_cfg);
     
-    $self->write_cfg_file($build_cfg);
+    &colcfg::write_build_cfg("$self->{'build_dir'}/build.cfg", $build_cfg);
+
     print STDERR "</Stage>\n" if $self->{'gli'};
 }
@@ -526 +530 @@
    my ($build_cfg) = @_;
    
-}
-
-sub write_cfg_file {
-    my $self = shift(@_);
-    my ($build_cfg) = @_;
-    
-    # write out the build information
-    &cfgread::write_cfg_file("$self->{'build_dir'}/build.cfg", $build_cfg,
-                 '^(builddate|buildtype|numdocs|numbytes|numwords|numsections|maxnumeric|indexstem)$', 
-                             '^(indexmap|subcollectionmap|languagemap|notbuilt)$');
-
 }