X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2FCommodsWeb.pm;h=adcff3492c154682263fe00698cf6fc6d8c7863a;hb=88a4cb4aba6429c13a848dafe3f82652cfc168cb;hp=24ee53e92f2c580930ff772a2720cd77738be95e;hpb=422fab9f34f08090bca02f67cb41bba31f816c7e;p=ypp-sc-tools.db-test.git 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; }