Changeset 22670

Timestamp:

02/09/10 23:07:42 (17 months ago)

Author:

alex

Message:

Added a header row to a the table example in this recipe

File:

• branches/mnw21/pathquery_refactor/intermine/perl/lib/InterMine/Cookbook/Recipe7.pod (modified) (2 diffs)

branches/mnw21/pathquery_refactor/intermine/perl/lib/InterMine/Cookbook/Recipe7.pod

@@ -131 +131 @@
   use Moose::Role;
 
-  requires qw(results_iterator);
+  requires qw(results_iterator views);
 
   sub results_as_html_table {
@@ -138 +138 @@
       die $ri->status_line unless $ri->is_success;
       my $table_string = '<table>';
+      $table_string .=
+        "<tr>".
+        join('', map {"<td>$_</td>"} $self->view).
+        "</tr>";
       while (my $row = $ri->html_row) {
           $table_string .= $row;