Show
Ignore:
Timestamp:
24.08.2011 15:52:02 (8 years ago)
Author:
davidb
Message:

Code changes to support indexers that are provided through the extension mechanism

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/basebuilder.pm

    r24342 r24460  
    329329    my $outhandle = $self->{'outhandle'}; 
    330330 
     331    $self->pre_build_indexes(); 
     332 
    331333    my $indexes = []; 
    332334    if (defined $indexname && $indexname =~ /\w/) { 
     
    352354    } 
    353355 
    354     $self->build_indexes_extra(); 
    355  
     356    $self->post_build_indexes(); 
     357 
     358} 
     359 
     360# implement this in subclass if want to do extra stuff at before building 
     361# all the indexes 
     362sub pre_build_indexes { 
     363    my $self = shift(@_); 
     364    my ($indexname) = @_; # optional parameter 
    356365} 
    357366 
    358367# implement this in subclass if want to do extra stuff at the end of building 
    359368# all the indexes 
    360 sub build_indexes_extra { 
    361     my $self = shift(@_); 
    362      
     369sub post_build_indexes { 
     370    my $self = shift(@_);    
    363371} 
    364372