X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FCWMP%2FSession.pm;h=b971331e481998b200fcb4eb981da0316058d815;hb=71970361377c34791fd6e7970a32fd2ba345d8bc;hp=3139cbb5880163ef68661efe9101c96fcca40650;hpb=12a50bdc9389aa9a6dd5011365c11ed2091106e7;p=perl-cwmp.git diff --git a/lib/CWMP/Session.pm b/lib/CWMP/Session.pm index 3139cbb..b971331 100644 --- a/lib/CWMP/Session.pm +++ b/lib/CWMP/Session.pm @@ -204,8 +204,6 @@ If debugging level of 3 or more, it will create dumps of responses named C<< dum sub dispatch { my $self = shift; -warn "##!!! dispatch(",dump( @_ ),")\n"; - my $dispatch = shift || die "no dispatch?"; my $args = shift;