Dessert: Improved the regex.
authorJag Talon <talon.jag@gmail.com>
Tue, 29 Oct 2013 13:58:20 +0000 (09:58 -0400)
committerJag Talon <talon.jag@gmail.com>
Tue, 29 Oct 2013 13:58:20 +0000 (09:58 -0400)
Added ^ and $ so that queries such as "dessert starting with abcd" wouldn't trigger the plugin.

lib/DDG/Goodie/Dessert.pm

index 021821c..8868d5f 100644 (file)
@@ -37,15 +37,15 @@ my %desserts = (
 
 triggers start => 'dessert', 'desserts';
 handle remainder => sub{
-       if(lc $_ =~ m/(?:that)? ?(?:start|beginn?)s?(?:ing)? ?(?:with)? ([a-zA-Z])/i){
-               my $in = lc $1;
-               my $output = 'A Desert beginning with ' . (uc $in) . ' is ';
-               
-               my $items = $desserts{lc $in};
-               $output .= itemify(@{$items});
-               return $output;
-       }
-       return;
+    if(lc $_ =~ m/^(?:that )?(?:start|beginn?)s?(?:ing)? ?(?:with)? ([a-zA-Z])$/i){
+       my $in = lc $1;
+       my $output = 'A Desert beginning with ' . (uc $in) . ' is ';
+       
+       my $items = $desserts{lc $in};
+       $output .= itemify(@{$items});
+       return $output;
+    }
+    return;
 };
 
 zci is_cached => 0;