mason/biosource/sample/sample_list.mas

   1 <%args>
   2     $objects
   3 </%args>
   4
   5 <& /page/columnar_table.mas,
   6     headings => [ "Type", "Name" ],
   7     data     => [
   8        map {
   9          my $o = $_;
  10          $o = $o->get_bssample_row unless $o->can('type');
  11          [
  12           $o->type ? $m->scomp('/chado/cvterm_link.mas', cvterm => $o->type) : '<span class="ghosted">n/a</span>',
  13           $m->scomp('/biosource/sample_link.mas', sample => $o ),
  14          ]
  15        }@$objects
  16     ],
  17 &>