mason/transcript/transcript_page_error.mas

   1 <%doc>
   2
   3 =head1 NAME
   4
   5  transcript_page_error.mas
   6  A mason page to return the message: Wrong arguments were used for search
   7
   8 =cut
   9
  10 =head1 VERSION
  11
  12 0.1
  13
  14 =cut
  15
  16 =head1 DESCRIPTION
  17
  18  This is a mason script to return an error message when:
  19
  20  1) 'id' or 'unigene_id' are not used as CXGN::Page arguments
  21
  22  2) $args{'id'} does not exists into the database
  23
  24
  25 =cut
  26
  27 =head 1 AUTHOR
  28
  29  Aureliano Bombarely (ab782@cornell.edu)
  30
  31 =cut
  32
  33 </%doc>
  34
  35
  36 <%args>
  37 $object
  38 </%args>
  39
  40
  41 <%perl>
  42
  43 ## Parse the object name
  44
  45 my $name = lc(ref($object));
  46 $name =~ s/cxgn::transcript:://;
  47
  48 </%perl>
  49
  50 <h2>ERROR PAGE REQUEST:</h2>
  51
  52 <big>Wrong arguments are been used to request the <% $name %> page.</big>
  53