From 0c93eb28451495f2bd053d8d5eb6c9ed07a68e58 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 8 Mar 2010 14:23:19 +0000
Subject: [PATCH] find all Parameters supported by CPE

git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@277 836a5e1a-633d-0410-964b-294494ad4392
---
 lib/CWMP/Session.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/CWMP/Session.pm b/lib/CWMP/Session.pm
index 4ce8a07..9d2a7b1 100644
--- a/lib/CWMP/Session.pm
+++ b/lib/CWMP/Session.pm
@@ -173,7 +173,7 @@ sub process_request {
 			$xml = $self->dispatch( 'GetParameterNames', [ 'InternetGatewayDevice.', 1 ] );
 		} else {
 			my @params =
-				grep { m/\.$/ && ! m/\.\d+\.$/ }
+				grep { m/\.$/ }
 				keys %{ $stored->{ParameterInfo} }
 			;
 			if ( @params ) {
-- 
2.20.1