X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-live.git;a=blobdiff_plain;f=yarrg%2Fweb%2Fdumptable;h=4e1fb3e5215e743ec7be8f06b505ecd82f44a2a8;hp=e60415c8469bae1c94dd8ed5851bfe84e48588a4;hb=18bff492748999fe28f474cea854f0fd26d6394f;hpb=38888dbd9221f97b1886ee545d0113c88432556a diff --git a/yarrg/web/dumptable b/yarrg/web/dumptable index e60415c..4e1fb3e 100644 --- a/yarrg/web/dumptable +++ b/yarrg/web/dumptable @@ -31,7 +31,7 @@ This Mason component is helpful for debugging and developing. It outputs plain HTML tables eg for SQL query results. You can either: - <& dumptable, sth = $executed_statement_handle &> + <& dumptable, sth => $executed_statement_handle &> in which case it will consume the results of the statement and print them unconditionally, or do the equivalent of: <& dumptable:start, sth => $sth, [ qa => $qa ] &> or @@ -59,7 +59,7 @@ $cols => $sth->{NAME} $qa => undef % if (!$qa || $qa->{'debug'}) { - +
% foreach my $field (@$cols) {
<% $field |h %>