mason/organism/tree.mas

   1 <%doc>
   2 =head1 ARGS
   3
   4 =head2 $organism_tree
   5
   6 hashref of:
   7
   8   {
   9      newick         => 'newick string',
  10      png            => 'png data',
  11      image_map      => 'html image map',
  12      image_map_name => 'name of the image map for <img usemap="" ... />',
  13   }
  14
  15 =cut
  16
  17 </%doc>
  18 <%args>
  19   $organism_tree
  20 </%args>
  21
  22      <div id="popup" style="visibility:hidden; position:absolute; top:0; left:0;">
  23        <table id="xtratbl">
  24        <tr><td id="org_title"><font color="#000000">Title Goes Here</font></td></tr>
  25        <tr><td id="org_content" bgcolor="#ffffff">
  26            Organism content goes here
  27        </td></tr></table>
  28      </div>
  29
  30      <div class="organism_tree">
  31
  32 % if( $organism_tree->{image_uri} && $organism_tree->{image_map} ) {
  33
  34 %    if( $organism_tree->{newick} ) {
  35        <form action="/tools/tree_browser/index.pl" method="post">
  36           <input type="hidden" name="tree_string" value="<% $organism_tree->{newick} |h %>" />
  37           <input type="submit" value="show in tree browser" />
  38        </form>
  39 %    }
  40
  41        <img src="<% $organism_tree->{image_uri} %>" usemap="#<% $organism_tree->{image_map_name} |h %>" />
  42        <% $organism_tree->{image_map} %>
  43
  44 % } else {
  45     <span class="ghosted">temporarily unavailable</span>
  46 % }
  47
  48      </div>