lib/CXGN/Page/Form/Hidden.pm

   1
   2 use strict;
   3 use CXGN::Page::Form::ElementI;
   4
   5
   6 package CXGN::Page::Form::Hidden;
   7
   8 use base qw / CXGN::Page::Form::ElementI /;
   9
  10 =head2 new
  11
  12  Usage:
  13  Desc:
  14  Ret:
  15  Args:
  16  Side Effects:
  17  Example:
  18
  19 =cut
  20
  21 sub new {
  22     my $class = shift;
  23     my $self = $class->SUPER::new(@_);
  24
  25     return $self;
  26 }
  27
  28 sub render {
  29     my $self = shift;
  30     return;
  31     #return "HIDDEN!\n";
  32     # hidden fields do not render at all in
  33     # the non editable version. That was easy!
  34     #
  35 }
  36
  37 return 1;