X-Git-Url: http://git.rot13.org/?p=perl-cwmp.git;a=blobdiff_plain;f=lib%2FCWMP%2FSession.pm;h=81190260bcdc27917f58db957fb229c83cd30505;hp=d6621687fd02f179d0ef9e27cdaab98dbd1d6b4b;hb=0d33363815949458c69e5b01bf5a899bb52a8ab3;hpb=b3f35798ca497b3d02382bfb9f80f97247694e3f;ds=sidebyside

diff --git a/lib/CWMP/Session.pm b/lib/CWMP/Session.pm
index d662168..8119026 100644
--- a/lib/CWMP/Session.pm
+++ b/lib/CWMP/Session.pm
@@ -131,8 +131,11 @@ sub process_request {
 		$xml = $self->dispatch( $job->dispatch );
 		$job->finish;
 	} else {
-		my @dispatch = CWMP::Vendor->all_parameters( $self->store, $uid, $queue );
+		my @dispatch;
+#		@dispatch = CWMP::Vendor->all_parameters( $self->store, $uid, $queue );
+warn "XXX", dump @dispatch;
 		@dispatch = CWMP::Vendor->vendor_config( $self->store, $uid, $queue ) unless @dispatch;
+warn "XXX", dump @dispatch;
 		$xml = $self->dispatch( @dispatch ) if @dispatch;
 		if ( ! $xml ) {
 			warn ">>> no more work for $uid sending empty response\n";