Do not declare variables within (bogus) conditionals
if $index is unnecessary as we have made this true 5 lines above variables should not be declared in conditionals if used outside of them set $struct_attr to a sensible default to avoid generating warnings in this assigment and elsewhere Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
This commit is contained in:
parent
fcb8469d18
commit
1d014b4e39
|
|
@ -1123,14 +1123,14 @@ sub buildQuery {
|
|||
}
|
||||
|
||||
# Set default structure attribute (word list)
|
||||
my $struct_attr;
|
||||
my $struct_attr = q{};
|
||||
unless ( $indexes_set || !$index || $index =~ /(st-|phr|ext|wrdl)/ ) {
|
||||
$struct_attr = ",wrdl";
|
||||
}
|
||||
|
||||
# Some helpful index variants
|
||||
my $index_plus = $index . $struct_attr . ":" if $index;
|
||||
my $index_plus_comma = $index . $struct_attr . "," if $index;
|
||||
my $index_plus = $index . $struct_attr . ':';
|
||||
my $index_plus_comma = $index . $struct_attr . ',';
|
||||
|
||||
# Remove Stopwords
|
||||
if ($remove_stopwords) {
|
||||
|
|
|
|||
Loading…
Reference in New Issue