/[cvs]/nfo/perl/libs/RPC/XML/SessionServer.pm
ViewVC logotype

Diff of /nfo/perl/libs/RPC/XML/SessionServer.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by joko, Fri Apr 4 17:19:05 2003 UTC revision 1.2 by joko, Wed Apr 9 07:53:35 2003 UTC
# Line 228  sub _server_init_session { Line 228  sub _server_init_session {
228    my $session_id = $self->{__session_id};    my $session_id = $self->{__session_id};
229    # increase access-counter (per-session)    # increase access-counter (per-session)
230    $self->{__sessions}->{$session_id}++;    $self->{__sessions}->{$session_id}++;
231      #print "Initialized sessions:", "\n";
232      #print Dumper($self->{__sessions});
233  }  }
234    
235  sub get_session_id {  sub get_session_id {

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed