Changeset 24342


Ignore:
Timestamp:
2011-07-29T13:07:33+12:00 (11 years ago)
Author:
davidb
Message:

Support for building non-text indexes that are orthogonol to the usual text-based index

Location:
main/trunk/greenstone2/perllib
Files:
2 added
1 edited

Legend:

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

    r24070 r24342  
    206206    # if a buildproc class has been created for this collection, use it
    207207    # otherwise, use the default buildproc for the builder we are initialising
    208     my ($buildprocdir, $buildproctype);
     208    my $buildprocdir = undef;
     209    my $buildproctype;
     210
    209211    my $collection = $self->{'collection'};
    210212    if (-e "$ENV{'GSDLCOLLECTDIR'}/custom/${collection}/perllib/custombuildproc.pm") {
     
    218220    $buildproctype = "${collection}buildproc";
    219221    } else {
    220     $buildprocdir = "$ENV{'GSDLHOME'}/perllib";
    221222    $buildproctype = $self->default_buildproc();
    222223    }
    223     require "$buildprocdir/$buildproctype.pm";
     224    if (defined $buildprocdir) {
     225    require "$buildprocdir/$buildproctype.pm";
     226    }
     227    else {
     228    require "$buildproctype.pm";
     229    }
    224230
    225231    eval("\$self->{'buildproc'} = new $buildproctype(\$self->{'collection'}, " .
Note: See TracChangeset for help on using the changeset viewer.