[open-ils-commits] r16052 - trunk/Open-ILS/src/perlmods/OpenILS/Application (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2010-03-29 17:12:30 -0400 (Mon, 29 Mar 2010)
New Revision: 16052

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Search.pm
Log:
removed some unnecessary intermediate code that snuck into the commit

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Search.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Search.pm	2010-03-29 20:49:56 UTC (rev 16051)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Search.pm	2010-03-29 21:12:30 UTC (rev 16052)
@@ -73,7 +73,6 @@
     $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 @@
             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,