X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-live.git;a=blobdiff_plain;f=yarrg%2FCommodsWeb.pm;h=adcff3492c154682263fe00698cf6fc6d8c7863a;hp=24ee53e92f2c580930ff772a2720cd77738be95e;hb=2833d0fcda9aaf12852c490b4808579337246524;hpb=d3a91cadef5069516785e45388e42b97d1c031e4 diff --git a/yarrg/CommodsWeb.pm b/yarrg/CommodsWeb.pm index 24ee53e..adcff34 100644 --- a/yarrg/CommodsWeb.pm +++ b/yarrg/CommodsWeb.pm @@ -160,7 +160,7 @@ sub dbw_lookup_string ($$$$$$$$) { # => ( $emsg, @dbresults ) $each =~ s/^\s*//; $each =~ s/\s*$//; $each =~ s/\s+/ /g; my %m; my $results; - my @pats= ("$each", "$each\%", "\%$each\%"); + my @pats= ("$each", "$each \%", "$each\%", "\%$each\%"); if ($abbrev_initials) { push @pats, join ' ', map { "$_%" } split //, $each; }