X-Git-Url: http://git.rot13.org/?p=perl-cwmp.git;a=blobdiff_plain;f=lib%2FCWMP%2FStore.pm;h=2c79628c65f3046b8cc74a07289df790c5b360bf;hp=7a692694d924af64badbbba2b738613b2a6f4c7c;hb=8e930418d9be1ca455d38f2f3ce4c013432539db;hpb=397dff9ff9273c840cc59d5c2a6bde0540da7a4e

diff --git a/lib/CWMP/Store.pm b/lib/CWMP/Store.pm
index 7a69269..2c79628 100644
--- a/lib/CWMP/Store.pm
+++ b/lib/CWMP/Store.pm
@@ -171,6 +171,8 @@ sub ID_to_uid {
 
 	warn "#### ID_to_uid",dump( $ID, $state ),$/ if $self->debug > 4;
 
+	warn "##### current session = ",dump( $session ), $/ if $self->debug > 5;
+
 	$session->{ $ID }->{last_seen} = time();
 
 	my $uid;