Ignore:
Timestamp:
2002-07-05T16:55:56+12:00 (21 years ago)
Author:
jrm21
Message:

Don't allow fields Encoding or Language for search - these are internal?!?

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/perllib/mgppbuildproc.pm

    r3195 r3226  
    346346        my ($field, $value) = (@$pair);
    347347
    348         if ($field ne "Identifier" && $field !~ /^gsdl/ &&
    349         defined $value && $value ne "") {
     348        if ($field !~ /^(?:Identifier|Encoding|Language|gsdl)/
     349        && defined $value && $value ne "") {
    350350
    351351        # escape problematic stuff
     
    592592                my ($mfield, $mvalue) = (@$pair);
    593593                # check fields here, maybe others dont want - change to use dontindex!!
    594                 if ($mfield ne "Identifier" && $mfield ne "classifytype" && $mfield ne "assocfilepath" &&
    595                     $mfield !~ /^gsdl/ && defined $mvalue && $mvalue ne "") {
     594                if ($mfield !~ /^(?:Identifier|Encoding|Language|gsdl)/
     595                    && $mfield ne "classifytype"
     596                    && $mfield ne "assocfilepath"
     597                    && defined $mvalue && $mvalue ne "") {
    596598                   
    597599                    if (defined $self->{'indexfieldmap'}->{$mfield}) {
Note: See TracChangeset for help on using the changeset viewer.