Changeset 28062 for gs3-extensions

Show
Ignore:
Timestamp:
15.08.2013 14:17:56 (6 years ago)
Author:
kjdon
Message:

removing print statements, allow for special sort field 'none'

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • gs3-extensions/solr/trunk/src/perllib/solrbuildproc.pm

    r27815 r28062  
    571571        my $seenfields = {}; 
    572572    foreach my $sfield (@{$self->{'sortfields'}}, @{$self->{'facetfields'}}) { 
    573         print STDERR "sort/facet field = $sfield\n"; 
    574         # ignore special field rank 
    575         next if $sfield eq "rank"; 
     573        # ignore special field rank/none 
     574        next if $sfield eq "rank" || $sfield eq "none"; 
    576575        # ignore any we have already done - we may have duplicates in the sort and facet lists 
    577576        next if (defined $seenfields->{$sfield}); 
    578         print STDERR "processing it\n"; 
    579577        $seenfields->{$sfield} = 1; 
    580578        my $sf_shortname; 
     
    602600        foreach my $item (@metadata_list) { 
    603601        &ghtml::htmlsafe($item); 
    604         $new_text .= "$item"; 
     602        $new_text .= "$item "; 
    605603        } 
    606604        if ($new_text =~ /\S/) { 
    607         #$new_text = "<$sf_shortname index=\"1\" tokenize=\"0\">$new_text</$sf_shortname>"; 
    608605        $new_text = "<field name=\"$sf_shortname\">$new_text</field>\n"; 
    609606        # filter the text??? 
    610607        $text .= "$new_text"; # add it to the main text block 
    611         print STDERR "adding in sort text $new_text\n"; 
    612608        $self->{'actualsortfields'}->{$sfield} = 1; 
    613609        }