[Xen-devel] [OSSTEST PATCH 4/6] sg-report-flight: Convenience aliases for runvar row

[Ian Jackson <ian.jackson@xxxxxxxxxxxxx>]

No functional change.

Signed-off-by: Ian Jackson <Ian.Jackson@xxxxxxxxxxxxx>
---
 sg-report-flight |   13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/sg-report-flight b/sg-report-flight
index 1f69c08..bd7d968 100755
--- a/sg-report-flight
+++ b/sg-report-flight
@@ -942,15 +942,18 @@ END
 <table rules=all><tr><th>Name</th><th>Value</th><th>Source</th></tr>
 END
     my $varsq= db_prepare(<<END);
-        SELECT * FROM runvars
+        SELECT name, val, synth FROM runvars
                 WHERE flight=? AND job=?
              ORDER BY synth, name
 END
     $varsq->execute($fi->{Flight}, $job);
-    while (my $varrow= $varsq->fetchrow_hashref()) {
-        print H "<tr><th>".encode_entities($varrow->{name})."</th>";
-        print H "<td>".encode_entities($varrow->{val})."</td>";
-        print H "<td>".($varrow->{synth} ? 'execution' : 'definition')."</td>";
+    while (my $varrow= $varsq->fetchrow_arrayref()) {
+        my ($vn,$vv,$synth) = (@$varrow);
+        print H "<tr><th>".encode_entities($vn)."</th>";
+        print H "<td>";
+        print H encode_entities($vv);
+        print H "</td>";
+        print H "<td>".($synth ? 'execution' : 'definition')."</td>";
         print H "\n";
     }
     print H "</table></body></html>\n";
-- 
1.7.10.4


_______________________________________________
Xen-devel mailing list
Xen-devel@xxxxxxxxxxxxx
http://lists.xen.org/xen-devel