--- nfo/perl/libs/RPC/XML/SessionServer.pm 2003/04/04 17:19:05 1.1 +++ nfo/perl/libs/RPC/XML/SessionServer.pm 2003/04/09 07:53:35 1.2 @@ -228,6 +228,8 @@ my $session_id = $self->{__session_id}; # increase access-counter (per-session) $self->{__sessions}->{$session_id}++; + #print "Initialized sessions:", "\n"; + #print Dumper($self->{__sessions}); } sub get_session_id {