Adding autotruncation
Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
This commit is contained in:
parent
c04f833db0
commit
2f28f2fdf5
14
C4/Search.pm
14
C4/Search.pm
|
|
@ -922,16 +922,6 @@ sub buildQuery {
|
|||
# Some helpful index variants
|
||||
my $index_plus = $index . $struct_attr . ":" if $index;
|
||||
my $index_plus_comma = $index . $struct_attr . "," if $index;
|
||||
if ($auto_truncation){
|
||||
# FIXME Auto Truncation is only valid for LTR languages
|
||||
# use C4::Output;
|
||||
# use C4::Languages qw(regex_lang_subtags get_bidi);
|
||||
# $lang = $query->cookie('KohaOpacLanguage') if (defined $query && $query->cookie('KohaOpacLanguage'));
|
||||
# my $current_lang = regex_lang_subtags($lang);
|
||||
# my $bidi;
|
||||
# $bidi = get_bidi($current_lang->{script}) if $current_lang->{script};
|
||||
$index_plus_comma .= "rtrn:";
|
||||
}
|
||||
|
||||
# Remove Stopwords
|
||||
if ($remove_stopwords) {
|
||||
|
|
@ -942,6 +932,10 @@ sub buildQuery {
|
|||
if ( $stopwords_removed && $DEBUG );
|
||||
}
|
||||
|
||||
if ($auto_truncation){
|
||||
$operand=~join(" ",map{ "$_*" }split (/\s+/,$operand));
|
||||
}
|
||||
|
||||
# Detect Truncation
|
||||
my $truncated_operand;
|
||||
my( $nontruncated, $righttruncated, $lefttruncated,
|
||||
|
|
|
|||
Loading…
Reference in New Issue