X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fweb%2Fqtextstringcheck;h=4fbfc546a88903180506ad850ba5411b288bbaa5;hb=e1117d96e803ab50e726eb42410c00151f76a4f5;hp=4adb606ea0b2c3e25dc8251dac335a47ee24e7e6;hpb=422fab9f34f08090bca02f67cb41bba31f816c7e;p=ypp-sc-tools.db-test.git diff --git a/yarrg/web/qtextstringcheck b/yarrg/web/qtextstringcheck index 4adb606..4fbfc54 100755 --- a/yarrg/web/qtextstringcheck +++ b/yarrg/web/qtextstringcheck @@ -95,7 +95,7 @@ if ($chk->method_exists('execute')) { my $sqlstmt_nqs= @sqlstmt_nqs; my @specs= $chk->attr('multiple') - ? (split m#[/|,]#, $string) + ? (split m#\s*[/|,]\s*#, $string) : ($string); foreach my $each (@specs) { @@ -109,7 +109,7 @@ if ($chk->method_exists('execute')) { $chk->scall_method("manyambig"), sub { $chk->scall_method("ambiguous", - spec => $each, couldbe => $_[0]) + spec => $each, couldbe => $_[1]) }); if (defined $temsg) { $emsg= $temsg;