X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fweb%2Fquery_commod;h=3b2bf3554533f40a334d63690dac86f023b16764;hb=8fb8cf52d2bf96beda40c30134e04a352ff988b4;hp=ee4c9f3177aad6eb311bcb11ecb7e2b5234ca173;hpb=ee80b1ab92305277d07d99faea8682aea690b59a;p=ypp-sc-tools.db-live.git
diff --git a/yarrg/web/query_commod b/yarrg/web/query_commod
index ee4c9f3..3b2bf35 100644
--- a/yarrg/web/query_commod
+++ b/yarrg/web/query_commod
@@ -36,6 +36,7 @@
<%args>
$quri
$dbh
+$commodid => undef;
$commodstring => '';
$prselector
$someresults
@@ -44,7 +45,7 @@ $emsgokorprint
<%perl>
my $emsg;
-my ($commodname,$commodid);
+my ($commodname,$cmid);
my $qa= \%ARGS;
%perl>
@@ -54,25 +55,12 @@ my $qa= \%ARGS;
% $prselector->('BuySell');
% $prselector->('ShowBlank');
-%#---------- textbox, user enters route as string ----------
-% if (!$qa->{Dropdowns}) {
-
-Enter commodity (abbreviations are OK):
-