chiark
/
gitweb
/
~yarrgweb
/
ypp-sc-tools.web-live.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Make prices for commodity work again
[ypp-sc-tools.web-live.git]
/
yarrg
/
web
/
query_commod
diff --git
a/yarrg/web/query_commod
b/yarrg/web/query_commod
index b37fa39001e25ec966f234e4ff84735c340c18b7..81e8208d1b34abd3fda1bb38e0181eb29949762c 100644
(file)
--- a/
yarrg/web/query_commod
+++ b/
yarrg/web/query_commod
@@
-64,7
+64,7
@@
Enter commodity (abbreviations are OK):<br>
<&| qtextstring, qa => $qa, dbh => $dbh,
thingstring => 'commodstring', emsgstore => \$emsg,
-
perresult => sub { ($commodname,$cmid)= @_
; }
+
onresults => sub { ($commodname,$cmid)= @{ $_[0] }
; }
&>
size=80
</&>