Merge pull request #4106 from solgenomics/topic/wishlist
[sgn.git] / mason / markers / view_rflp.mas
blob8b185dcbd328fe6d9805dcd576478879de48568e
1 <%args>
2   $marker
3   $image_location
4   $image_size
5 </%args>
6 <%init>
8 my $marker_id   = $marker->marker_id;
9 my $marker_name = $marker->name_that_marker();
10 my $width_attribute = $image_size eq 'full' ? '': 'width="740"' ;
12 </%init>
14 <& /page/page_title.mas, title => "RFLP image for marker $marker_name" &>
16 <a href="/search/markers/markerinfo.pl?marker_id=<% $marker_id %>">Return to <% $marker_name %> info page</a>&nbsp;&nbsp;&nbsp;
18 % #if we are constraining the size of the image (small image view)
19 % if( $width_attribute ) {
21     <b>Size:</b>&nbsp;&nbsp;&nbsp;Small&nbsp;&nbsp;&nbsp;<a href="?marker_id=<% $marker_id %>&amp;size=full">Full</a><br /><br />
23 % } else { #else we are not constraining the size of the image (large image view)
24     <b>Size:</b>&nbsp;&nbsp;&nbsp;<a href="?marker_id=<% $marker_id %>&amp;size=small">Small</a>&nbsp;&nbsp;&nbsp;Full&nbsp;&nbsp;<br /><br />
26 % }
28 <img src="<% $image_location %>" border="0" <% $width_attribute %> />