removed some unnecessary intermediate code that snuck into the commit
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 29 Mar 2010 21:12:30 +0000 (21:12 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 29 Mar 2010 21:12:30 +0000 (21:12 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@16052 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Search.pm

index 3e7d15d..4176497 100644 (file)
@@ -73,7 +73,6 @@ sub spellcheck {
     $class ||= 'default';
 
     my @conf_path = (apps => 'open-ils.search' => app_settings => spelling_dictionary => $class);
-    push(@conf_path, $class) if $class;
 
        if( my $dict = $conf->config_value(@conf_path) ) {
                $speller->set_option('master', $dict);
@@ -99,10 +98,6 @@ sub spellcheck {
             push(@trimmed, $sug);
         }
 
-        # remove alternate-cased duplicates and versions of the origin word
-        @suggestions = grep { lc($_) ne $word } @suggestions;
-        my %sugs = map { lc($_) => 1 } @suggestions;
-
                push( @resp, 
                        {
                                word => $word,