mason/feature/residues.mas

   1 <%args>
   2   $feature
   3   $blast_url
   4 </%args>
   5 <%perl>
   6
   7 if( $feature->residues && length $feature->residues < 200_000 ) {
   8 </%perl>
   9   <div style="margin-left: 1em">
  10     <& /sequence/with_markup.mas,
  11            seq       => $feature,
  12            width     => 80,
  13            subdiv    => 10,
  14            blast_url => $blast_url,
  15     &>
  16     <div style="margin-top: 1em">
  17       <& /feature/sequence_download.mas,
  18            feature => $feature,
  19        &>
  20     </div>
  21   </div>
  22 <%perl>
  23 }
  24 else {
  25   if( $feature->residues || $feature->search_featureprops('large_residues')->count ) {
  26 </%perl>
  27     <p class="warning">Sequence too large to display.</p>
  28     <& /feature/sequence_download.mas, feature => $feature  &>
  29 <%perl>
  30   }
  31 }
  32 </%perl>