cvs commit: p5ee/P5EEx/Blue/P5EEx/Blue/Session HTMLHidden.pm

[spadkins]

cvsuser     02/02/01 12:40:34

  Modified:    P5EEx/Blue/P5EEx/Blue/Session HTMLHidden.pm
  Log:
  fixed the html() method to use $session->{state}
  
  Revision  Changes    Path
  1.2       +2 -6      p5ee/P5EEx/Blue/P5EEx/Blue/Session/HTMLHidden.pm
  
  Index: HTMLHidden.pm
  ===================================================================
  RCS file: /cvs/public/p5ee/P5EEx/Blue/P5EEx/Blue/Session/HTMLHidden.pm,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -w -r1.1 -r1.2
  --- HTMLHidden.pm     1 Feb 2002 20:36:22 -0000       1.1
  +++ HTMLHidden.pm     1 Feb 2002 20:40:34 -0000       1.2
  @@ -1,6 +1,6 @@
   
   #############################################################################
  -## $Id: HTMLHidden.pm,v 1.1 2002/02/01 20:36:22 spadkins Exp $
  +## $Id: HTMLHidden.pm,v 1.2 2002/02/01 20:40:34 spadkins Exp $
   #############################################################################
   
   package P5EEx::Blue::Session::HTMLHidden;
  @@ -114,11 +114,7 @@
       my ($self, $options) = @_;
       my ($sessiontext, $sessiondata, $html);
   
  -    $sessiondata = {};
  -    $sessiondata->{widget}  = $self->{widget};
  -    $sessiondata->{user}    = $self->{user};
  -    $sessiondata->{org}     = $self->{org};
  -
  +    $sessiondata = $self->{state};
       $sessiontext = encode_base64(Compress::Zlib::memGzip(freeze($sessiondata)));
   
       my ($maxvarsize, $maxvarlines);