X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FCWMP%2FStore.pm;h=2c79628c65f3046b8cc74a07289df790c5b360bf;hb=b5a2f1396dbfdee1df523e42e89644130ac2e9ff;hp=7a692694d924af64badbbba2b738613b2a6f4c7c;hpb=6ce75d1058721ecaf61a4db0256bb82ab9e44821;p=perl-cwmp.git 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;