Permalink
Browse files

Make "DuckDuckGo" in "DuckDuckGo or something" query case insensitive.

  • Loading branch information...
1 parent 23ab98b commit 60a51e5272fcca469cf964b00669286174ab5b44 @xfix committed Jul 6, 2012
Showing with 2 additions and 1 deletion.
  1. +1 −1 lib/DDG/Goodie/ABC.pm
  2. +1 −0 t/ABC.t
View
@@ -25,7 +25,7 @@ handle query_parts => sub {
return if scalar(@choices) <= 1;
my $choice = int(rand(@choices));
- if (my @duck = grep { $_ eq 'duckduckgo' || $_ eq 'duck' || $_ eq 'ddg' } @choices) {
+ if (my @duck = grep { / \A (?: duck (?: duckgo )? | ddg ) \z /ix } @choices) {
return $duck[0]." (not random)", answer_type => 'egg';
}
View
@@ -15,6 +15,7 @@ ddg_goodie_test(
'yes or no' => test_zci(qr/(yes|no) \(random\)/),
"this or that or none" => test_zci(qr/(this|that|none) \(random\)/),
"duckduckgo or google or bing or something" => test_zci("duckduckgo (not random)", answer_type => 'egg'),
+ "DuckDuckGo OR Google OR Bing or SOMETHING" => test_zci("DuckDuckGo (not random)", answer_type => 'egg'),
);
done_testing;

0 comments on commit 60a51e5

Please sign in to comment.