WIP colouring in

[ypp-sc-tools.main.git] / yarrg / web / query_offers

diff --git a/yarrg/web/query_offers b/yarrg/web/query_offers
index 76f45c0da52f143bb39fd7de472c5a1118539cdf..6dc70f47d015f9813e828111c41c7ab6363b2066 100644 (file)
--- a/yarrg/web/query_offers
+++ b/yarrg/web/query_offers
@@ -54,6 +54,7 @@ my ($commodname,$cmid);
 my $qa= \%ARGS;
 </%perl>
 
 my $qa= \%ARGS;
 </%perl>
 

+<div class="query">

 <h1>Prices for commodity at location(s)</h1>
 
 % $prselector->('BuySell');
 <h1>Prices for commodity at location(s)</h1>
 
 % $prselector->('BuySell');


@@ -79,6 +80,8 @@ my $qa= \%ARGS;
 <& "lookup:formhidden", ours => $ours &>
 
 </form>
 <& "lookup:formhidden", ours => $ours &>
 
 </form>

+</div>
+<div class="results">

 
 %#========== results ==========
 <%perl>
 
 %#========== results ==========
 <%perl>


@@ -166,7 +169,7 @@ foreach my $bs (split /_/, $qa->{BuySell}) {
 </%perl>
 %      while ($row= $sth->fetchrow_arrayref) {
 %              if (!$rowix) {
 </%perl>
 %      while ($row= $sth->fetchrow_arrayref) {
 %              if (!$rowix) {

-<table id="<% $bs %>_table" rules=groups>
+<table class="data" id="<% $bs %>_table" rules=groups>

 <colgroup span=2>
 <colgroup span=3>
 <colgroup span=1>
 <colgroup span=2>
 <colgroup span=3>
 <colgroup span=1>